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Abstract; 

This paper describes LLOGO, in implementation of the LOGO language written in 
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merits of LOGO and LISP as educational languages are discussed. Design flecisions in the 
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LLOGO*f special facilities for charKter-^riented display terminals, graphic display 
"turtles"* and music generation are also described. 
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Section I Why Imptement LOCO in LISP 



. .LISP ha$' proved itself to be a powerful l\nguige for representing complex 
information processing tasks. This power stems from: 

1. The uhiform representation of programs and data. 

2. The ability to build arbitrarily complex d^ata structures in the form of s*expressions. 

3. Recursion. . . . - ' 

Power, however, is not r^cessarily good pedagogy. LOGO is a computer language 
jdesigned especially for the beginner. Its purpose is to introduce the fundamental ideas^ 
of computation as clearly as possible. ^ 

LISP LOGO is an implementation of LOGO in LISP. It has been designed for several 
reasons. The first is that these two languages share a fundamental cl^e in common.^ 
Both are time shared, interpretive languages capable of full recursioil. Variable and 
procedure names may be any string of letters and digits. Sub-procedure definitions are 
independent of super-procedures. Both numerical and list*structured information can be ^ 
manipulated with equal facility. Thus, the LOGO systems programmer is freed of the 
necessity of re-developing various facilities already available in LISP (lisls, recursion, 
garbage collection, error service traps, interrupts). He can concentrate on additions 
(better error analysis) and modifications (pedagogical simplifications) to LISP. LL(XaO 
umfiies language development across a broad spectrum ranging from PLANNER and 
CONNIVER througk^LISP to COGO, 

A second reason for this implementation is to provide a natural transitiort to the 
i^re powerful cdhputational world of LISP as t^te student grows more sophisticated. 
When desired, the student has access to all of the capabilities of LISP including: 



Arrays . - 

Functions of arbitrary number of inputs 

Functions that do not evaluate their inputs 

MICRO-PLANNER and CONMVER 

Interrupts 

LISP compiler 

Property lists , . 

Floating point numbers \ 
Character display cursor manipulation * 
Infinite precision fixed point arithmetic* 
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The dif fartncts betwtt n LOGO and LISP can bt dif^rjbfd on tha basis of. thrtt 
educational goals: 

Simplicity of both the computational and explanatory kind 

Naturalness wherein the overhead for a naive usej" is minimized by following 
standard English conventions. ^■ 

Disparity which emphasizes the distinction betwaen various modes such as 

defining versus running programs* 

It should be noted, however, that there can be no one unique solution to the 
*best** educational language: Jhese three goals can conflict. Furthermorerthey cannot be 
so emphasized that important ideas of computation are completely eliminiited from the 
language. For students of different backgroundsi simplicity and naturalness may have 
very different meanings. * Hancai alternatives to the particular choices made in designing 
CLOGO and lllOGO are also described This section may be viewed as presenting a 
spectrum of possibilites'from which a teKher can build a computational world tailored to 
his own pedagogical purposes. 

. y 

2.1 Simplicity 

Lists versus Sentences 

Lists have a simple recursive de/initioa A list is either 

\. ' - ^ 

L NILf the empty list 

2. (wordl word2 . . .) , a Sequence of words atoms) 

3. A list of lists. • • 

This definition is confusing when the student is still having trouble with the concept of 
recursion. CLOGO limits itself to lists built from only thejirst two of these three clauses* 
' Such lists are called '^sentences". 

Alternative view: the concept of racursion is too important to be eliminated 
•^from LOGO. Recursive programs are allowed. Educationallyi the more examples 
of recursion availablei the easier it is to understand. Hancei lists should be 
allowed. 

Computational power is Hot always in confl^pt with educational simplicity. In 
addition to the standard list operations of FIRST (CAR) and BUTFIRST {CDR\ LOGO 
provi^s L/IST and BUTtsAST. Furthermore! all four of these operations work on words 
as wMp-as sentences. The fact that word manipulation is more costly Jhah list 
manipulation for LISPi or that ticking the LAST of a list is more experntive than computing 
its FIRST is not of interest to the beginner. The natural symmetry of having all of these 
operations is to be preferred. 

Alternative view: LOGO introduces two data types words and sentences. 



Dlllertiicta belwccfi LOQO and LISP 



7 



Section 2.1 



LISP LOIGO MEMO FkgeS . June 27, 1974 



There is both an empty word and an empty sentence. LISP's world, is easier to 
understand. J'here is only one type of data, s**expressions. Primitives like C/lff 
are. list operations only; they do not operate on words by manipulating the 
^ word's print name, as LOGO'S FIRST does. ' . 

, ■ ^ 

Repeatedly BUTFIRSTrng a sentence in LOGO always terminates in the empty list. 
In LISP, with its more general list structure built from "dotted pairs" and CO/VSing, this is 
not always so. Ihh result is the possibility of "slip-through" bugs for EMPTY P endtests 
of recursive procedures. Thus, lOGO eliminates a common source of error without 
significantly limiting computational power. 

Alternative view; ^Allowing an atom to be the CDR^ of an s-^expression 
sometimes allows far economy of storage. Also, the symmetry of C/IR and CDR 
in LISP make the data structure easier to explain, although they are symmetric 
as list operations only for the particular representation of lists used in LISP. 

Rigid program form 

LISP allows programs to be lists of any form. Editing and debuggifig conseqCwntly 
become awkward due to- the difficulty in naming parts of the program. LOGO simplifies 
program structure by requiring that a program be a series of numbered lines. The 
locations of bugs and intended edits are then far easier to describe. * 

Criticism: LOGO violates this assumption by allowing fhe user to create lines of 
unlimited complexity. It would be preferable to limit. a IJne to a single top level 
call. Thfs does not prohibit nesting, a fundamental idea in computation. But it 
does prohibit defeating the entire point of line numbers with such code as: 

>10 FD )00 RT90 FD 100 RT90 ... 

An alternative scheme might be to adopt a "DDT" like convention. Lines are 
identified by offsets from user-defined ' location symbols. T|iis has ' t^ 
advantage of encouraging thenjse of mnemonic names for portions of the u$er*s 
program, rather than line numbers, which have no mnemonic value, while 
. retaining the virtue of having a name for every part of th^ program. The user 
' would not have to renumber lines if he wanted to insert more lines between 
two lines of code than the difference between their line numbers. 

Integer Arithmetic • 

The initial CLOGQ world limits the user to integer arithmetic. The rationale behind 
this is to avoid the coni)t)lexity of decimal fractions. This is clearly a simplification whose 
value depends on the background of the students. 

Criticism: ever/ for elementary school children, this simplification may cause 
confusion. Most beginners are troubled with 

Proporwnts of fixed point arithmetic might reply that this is no.worse than 

1 

— -.999999 

1 • 
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Howeveri a ciecimal printer can ba clever in performing rounciof f. 

Other alternatives are to limit arithmetic to rational numbfrs, or to use the 
following LISP convention: Numbers are fixed point unless ending in a decimal 
fraction. Operations only return fixed point if both operands are fixed point. 

Another virtue of LISP is that fixed point numbers can be infinitely large. 
Arbitrary limitations due to the finite size of tlie computer's word do not exist to confuse 
the beginner. 

Conditionals 

LOGO allows the following, type of branching: 

>]0 TEST <predicaie> 

>20 IFTRUE 

>30 IFFMJSE .... 

TEST Ms a flag which subsequent IFTRUFs and IFFALSE^t access. This avoids the 
necessity of the entire conditional appearing on a single line of the procedure. The 
student has explicit names in the form of line numbers for, tach,branch.' 

Criticism: This prevents nesting of conditionals. A secoml conditional wipes out 
the results of the first. In LLOGO^ the flag set by TEST is simply a LISP 
variable. Since it is global, TESVs in sub-procedures can affect IFTRUE's in ^ 
th^'^lbper-procedure. This introduces a non-local nature to control structure. 

LOGO'S lack of canned loops such as DO and MAPCAR can be criticized as 
encouraging bad programming practice, such as excessive use of C)9. This obscures the 
logical structure of programs. Also, it may be significantly confusing to the beginner, and 
the source of many bugs. A child might understand quite well a control structure concept 
like ''do this part of the program three times" or "do this part of the program for eitch 
element of the list**, but may be unable to open-^Ode that control structure in terms of 
jumps and conditionals. LOGO programs can't be "pretty printed" to reveal their logical 
structure as can programs written in LISP or a block structured language. 

D 

2.2 Naturalness " 
Mnemonic Names 

An obvious virtue of any computer language is to use procedure names whose 
English meaning suggests^heir purpose. Consequintlyi LISP's primitives CAR and GDR 
are renamed F/RSr and fl(yrmsr * 

Note: Everyone remembers how un-mnemonic* Ci9R and CDR are. However, 
most LISP primitives are named after their English counterparts. , 

CLOGO syntax allows the use of certain "noise words", words which appear in the 
user*5 code, but have no effect beyond making the code read more like English sentences. 
For exiimple^ in the following lines of LOGO code, the AND, ORt THEN, and TO are 
permitted but serve, no computational purpose. They do not designate procedures, as is 
the u^ual case with words not beginning with a colon. 
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?BOr// <predicat§ l> AND <pr§4icM 2> 
tFATUEH <preiieaf l> OR <preiieat$ i> 
m <preiicate i> THEN 
too TO 



However, as Hhe student gams more insight into LOGO, noise words become a 
burden. They complicate the task of the parser, preventing the student from feeling that 
he really understands the language. Most of the noise words have been eliminated in 
*oth PDPll LOGO and LISP LOGO. [LLOGO will tolerate THEN in conditionals, and TO m 
transfers, however, because they are so commoply used.] 

Matching English vocabulary to computer functions can be difficult.'^ English words 
rarely have a single meaning. Following are some examples where CLOGO may have made 
the wrong choice. < 

1. CLOGO uses IS instead of ISQUAL for its equality predicate. The rationale is that IS 
will be more familiar to a non-mathematical beginner. However, the omnipresent nature 
of this English verb results in such LOGO code as: ^ 

ITEST IS tTHIS.NUMBER GREATERP tTHATMJMBER 

thus, it might be better for LOGO to use EQU'AL 

2. Another example where LOGO may have chosen the wrong word is in defining 
procedures. Thi!» is done via: « . . 



ITO PROCEDURE.NAME dNPUTI tlNPUT2 . . . 

The English word "to" can imply execution. For example, "he it to run his program*. A 
better choice would be "define". 



LISP avoids the necessity of parsing through the use of parentheses. This might 
be considered well worth emulating in LOGO for its explanatory simplicity. However, 
simplicity must be contrasted with naturalness. A beginner is used to using English 
where ve/bs and modifiers are connected by grammar, context and meaning rather than 
explicit parenthesiiing. This naturalness can be preserved for procedures that take a 
fixed number of inputs. This allows such lines of code to be understood by anyone 
without any special programming knowledge. 

?FORWARDm RIGHT 90 

Thus, a bi^ginner can express himself with no extra burden of parenthesizing when his 
procrewr4re still very simple. . 



Parsing can be y^$ei^p peri])it infix notation. Again it it simpler to demand that all 
functional calls^ be in prefix notation. However, a beginner it far more familar with 
FORWARD tSIDE^lO than with (FORWARD (SUM :SIDE 10)). 

Eventually, a$'one*s code becomes more . complex, parentheses ^become a 
simplifying tool. One do^s hot have to guess how the parser will work. LLOGO allows 
this. If desired^ parentheses are permitted and interpreted in the standard way. ^ 
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Criticism: LOGO complicates its parsing algorithm in stviral ways» making it 
difficult to explain to a student. For example, the language does not insist that 
all primitives take a fixed number of inputs. Jn some cases such as the title 
lines of definitions, this is reasonable. On the other hand, it is somewhat 
confusing to lirnit such primitives as SUM to only 2 inputs if rtot parenthesized 
but any number of inputs if parenthesized. Equally bad is the fact thitt 
primitives like llLOGO*s PRINTOUT for printing definitions do not evaluate 
their inputs. It would be more consistent for 

?PRINTOirr''PR0CRAkr 

to be required. " 

2.S Disparity * 

Program Versus Data ^ - 

@oth programs and data arejnformation structures. The difference between the 
two is solely a matter of use. LISP preserves this elegant view by allowing programs to 
be passed as input and, mdeed, to even redefine themselves. This power, for all its 
simpiicityy can confuse the beginner. For the novice, the difference between defining and 
running a procedure is unclear. LOGO provides clarification by forcing a complete 
distinction between the processes of defining and of evaluation. 

Criticism: LOGO violates this idea. A program can .be executed inside a 
definition if not preceded by a line number. This is a mistake. The typical case 
is for the user to have intended to type the line number. In its wistful desire 
for more computational power, LOGO has forgotten its epistemologicat 
foundations. 

Homonyms ' * 

LISP has the ability for a word to be the name of both a procedure and a 
variable. The postlion of the word in a list then determines how it is used. I^^lomonyms, 
however, can be confusing. Wow should a word which ts both a procedure and a variable 
bc^ treated when it is the first element in a. list? The choice is arbitrary. 

LOGO prevents such homonyms. Words evaluate as variables only when preceded 

by ^ 

... X . • causes X to evaluate lis a procedure call. 
... :X . • returns the value of the variable X. 

thusf LOGO and LISP share the power of allowing any string of letters to be either a 
procedure or a variable name. But LOGO insists on an unambiguous locaP distinction, 
independent of position, between these two uses. 

Another example of the clever ways LISP takes advantage of homonyms is NIL 
LISP uses this word to name both the empty list and the logical truth valuf; FAI^K, This 
can result in more economical pro(;^dures. The convenience, however, has no conceptual 
basis. Hence, it can confuse the user who does not yet understand either list 
manipulation or logical analysis well. This is similar to the situation in APL, where the 
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logical constants are the integers 0 and l^and conclitiorials art accomplished by numerical 
manipulation. It can lead to obscuring the purpose of a given pieci of code. 

Line oriented input 

LISP evaluates an expression whan parentheses balance. Thus it cannot catch 
errors caused by typing too many right parentheses. LOGO waits for a carriage return. 
Hence it is capable of recognizing this problem. Furthermore, a user can write seyeral 
^alls on a line. Execution is delayed until a carriage return is typed. This has the virtue 
of separating the tasKs of forming grammatictl expressions from executing programs. 

/ . ■ 
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Sectiym 1 dvcrview of jthe ImplSheiitatteii " 



^ Lisp LOGp IS designed $0 that the user need never know that he is co*municating 
with other than a stanjiard^OGO. However, if desired, he can insert parenthesteed LISP 
code jiny where In his LOGO program. - . . V 

- USFlbOO is basically a compiler.^ It converts LOGO input to LISR: programs; The 
result IS that running most procedures talws Jess time since the cocfe neerf not /be 
repeitedlyjoterned and parsed 

' ' " ■ ■ 'a t. ■' A 

\^ The following pfges provide an overview "^^of the major parts* of the system. 
These 'are its reaider; parser, eValuatQr^ printe?;^ and error handler. More detailed 
^explanations "Of these will follov( in later sections of this memo. Poi^ innplementation 
details, LISP LOI3Q i$ available in well-co^nmented interpretive code. ' f 

■ . . • . , m 

. Code for, the LOGO display turtle ii discussed in Section 15, and code for the 
music box in Section h6. The "LOGO project" . Is 'concerned with more than the 
development of a itomputer language. Of major interest is the design of various 
computer-driven devices which provide^ a rich problem solving environment for the 
student. However, 6j^efcial purpose.primitiyes for driving these devices ind(B»penden* of 
LOGO, versus L1SP issues and myst bn added individually. A USP-4)asfd implementation 
does have one special viRlue. For those devices, tike the music box which are driven by 
ASCII charactersi the primitives can be writtp n m LISP or LOGO and then compiled. It is 
not necessary to' create tode at the machine level. 

■ • , - ' J'. ^ " 

$i Reader ^ ^ 

_ The LOGO reader is basically a llne-Oriented LISP reader. It rehirns a list/of 
-atoms read between .cari'iage retur.ns. The fundamental taskfe of interning atoms and 
building list structure are handled by LISP. Conflicts in character syntax and idi^ntifiers 
between LISP and LOGO present the Only subtleties. 

Certain characters such as the infix operators +, *, and. / do not require^ spaces 
to be set off as atoms. This is equivalent to being a "single character object^ in LISP. 
Other characters such as "." in dotted pairs are special in LISP but not tn LOGO. The 
solution to these conflicts is found in using separate "readtahle'^s forloGO and LISP. 

. . Conflicts in names also occur. The LOGO user has access to ajl the' ordinary LISP 
proc«5dures^ but must be prevented from accessing LISP procedures which are internal to 
LLOGO. This is accomplished by using two ^obarlhlys*'. When the us^r types in an 
identifier with the same name as an internal procedure, he fccesses a different atom. 

t^^ACpSP allows any nupiber Of separate •readtable"s and "obarray**?/ This 
permits multiple worlds - PLANNER, CONWVER, LISP, LOGO - to co-exist with no conflict: 
Switching worlds is computationally fast. All that is necessary is to rebind the 
MADTMLE ^nd OBARRAY variables to the desired world On the other hand, the 
naive user is protected completely from o|her environments and need nbt even know of 
^ their existence. 
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"7 ; ' . . 

The parser converts » LOGO line to list-structured form. This .requires Jhat 
jnformation on the number of inputs used by a procedure be available, > Inserting 
parentheses 15^ « trivial compufation for protedures^with a fixed number of inputs. 
However, complexities are^introduced into jhe LOGO parser by; . 

• ' .. \ v_ . . 

1. Having infix as well as prefix operj[tors. 

2. Changing the number of inputs depoTKling upon whether \b§ user embedded the form, 
in parentheses (SUHf SEfiTENCE^ : n 

3. Primitives like TO that do not parse their input. 

4. Homonyms! Functrons ^ich have the same name in LISP and LOGO»i>ut have different 
meanings. These are handled by having the parser detect the names of LOGO primitives 
which conflict with LISP, and convert them to functions with different names that do not 
conflict. V * . ^ ^ , 

This makes the parser the most complicated part of the simulation. 

0 . ■ ■ ■ - 

• ■ • .* - '• " • « 

Parsing information is stored on the property list of a function. The major sub- 
procedures are concerned wit!) prefix, infix, and user-typed parentheses. S)becial 
primitives are parsed by storing a procedure as the parsing property. }^ 



3 J Evaluation - \ • ^ 

" • . ' • * ' ■ ' * ♦■* 

The b$$ic JlOGO functions that do i the userV computation « i^. the arithmetic, list, 
and logical-primitives * are the simplest part of the simulation. These functions all occur 
in Lisp, usually in a somewhat .*more general form* Hence, tNs part of the implementation 
is little more than renaming. For many primitives, LLQGO provj^^ inore argument type 
checking and informative error messages than are supplied by thelf LijSP counterparts. 

Parsed code is executed directly by the LISP evaluator. Indeed, a user-jjiefined 
pro^ram^n parsed form is simply a LISP PKOG. The line numbers.are tags in the PROC. 



3.4 Printing 

LOGO procedures could be represented as lists of unparsr(f lines infer nally* In 
this case, a line must be interned and parsed each time it is run. However, the problems 
of printing the definition and editing a function are simplified. The internal format is 
identical to the format in which the user originally typed the expression. 

. . . * . ^ . ■ - 

An elternative solution is to represent LOGO programs in parsed, i.e. LISP form, 'k 
\ LOGO program internally is a LISP program. This maximizes run time speed and simplifies 
Nbuilding program understanders^ It has the disadvantage of complicating the parser and 
the printer. - <^ 

1. The parser must ^handle functions that tiave not yet been defined. This can be 
accomplished, howe.ver, by reverting to the solution of parsing at run time those lines 
%ivhich contain unknown functions. This run*time parsing can alter' the program*s definition 
a^s^ well so it only need occur once. • 

.Oi^^erview of iHfe Impfementatiiin Sactimi 3.4 
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xZ. Pnhting definitions and editing lin«s requires an inverse parsor or *unparser*' wMch 
returns the LISP-ified' code to its origir^ fprnt TNs is possit>l# providing there is na 
information lost in parstrig.^ Such is the case if the parser makes special provision for 
distinguisHfng user-typed parentheses from parser-t^nerated partnthesas. Ona way ta 
accomplish this is by beginning useHists with a dO-nothing function USEH^PAKEN 
« defined as: 

(DEFUNVSBR-PARgN(X)X) v ^ 

3. Editing title lines is made mori» cbmpteK. T^e editor .must reparst \m lines of su0er- 
procedures in which the edited function appiars* 1H% cifn be accomplished by 
maintaining a super -procedure treti although LLOGO ddcis not currently dp this* 

^ These complications can be avoidid by storing, both rtpresentations the 
procedure. This is an excellent example of a space versus coiaplaxity tradf'-oft USP 
LOGO turrently does not store both representations. , 



>>5 Error Analysis ^ 

2- , ■ _ ^ • 

Since LOGO is a language which is designed to be usecf by btginning 
programmers, it is important to provide informative error messagts* ConseqMontly, all 
LOGO primitives do extensive type checKing on their inputs. ILOGO will try to print out 
the form whic h gag ed the error, and gi^ the line number if the error occurred inside a 
procedure. Aft^l^pimple mistyping error which^can be ditacted by the parser, th* us«r 
is given an immediate opportunity to correct the line. For run timt errors^ he is given 
the option of causing breakpoints. Facilities for exploring the stack from inside a 
breakpoint loop are available. Since LOGO procedures ar# repreaentod intarnelly es USP 
procedures, the standard USP TR/lCf package can be^ used. 

These facilities are implemented using USP trror tntorrufit handlers and 
BVALFRAHB. If the sophisticated user wishes to provide hit own error handters, he can^ 
access the USP fKilities directly. 
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Section 4. Perfofmance 



J 



4 J Size 




tISP 

LLCXjO (compiled) 



Total spacf 



These figures do not include space for user programs, or loading the'display 
turtle, music, or GERMLAND packages. Between 5 and 10k,l>eyond the amount of storage 
.mentioned above would provide, a reasonable amount of workspace fof^ user programs 
and data; thisr would correspond roughly to programs of perhaps a'fevirpages. In the 
current MACLISP^ storage expands as nee^ded. l[OCO takes advantage of tNs feature *- If 
programs grow beyond a certain size the user is asked.whether he wishes the allocation 
to be increased. Storage is expanded automatically on loading special packages such as 
the display turtle. Of the 14 blocks which comprise the LLOGO system, all but 3 are^pure, 
and jcan be shared among users. . ' t 

4,2 Computation Time 



^ For most processing, LLOGO* enjoys a speed-up over CLOGO and IlLOGO due to 
the fact that parsing and interning occur only once at define time. Further, LLOGO makes 
it possible to compile LOGO source programs into machfne code using the MACLISP 
""compiler for increased efficiency [See Section 9]. WorkspKes can be stored on the 
disk in internal LISP format. {See Section 10.1] Consequently, re-reading files has no 
.overhead. CLOGO has an advai^age, however, in manipulating words, as its internal data 
structure is string rather than list oriented 



Almost all of the primitives of CLOGO and ULOGO, (including the music box, 
display turtle for the PDP-6 and GT40) are implemented. Hence, USP LOGO is capable of 
reading, parsing and running most files saved undei: CLOGO or IILOGO [perhaps 
necessitating minor modification} 

It can also t>e used real-time by an individual familiar only with LOGO: no 
knowledge of LISP h required. On the other hand, all of LISP's facilities are available. 
Programs can be written in LI$P, or in machine language using LAP, and can be made 
callable from LOGQ. Jhe special pack^g^ for the display turtle, music box and 
GERMLAND can also be used from an oisilKnary USP. Some other fjKH^s of LLOGO, such 
as the breakpoint and stack manipulating function$,^are also avanable for use in LISP. 
LISP users can take advantage of these fKilities^without interKtion with LOGO simply by 
loading the appropriate files of LISP functions. 



4.9 Use 



Perfortnance 



' SeclMmfS 
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4.4 AmiliiMlitr ■ . " 

The implementation is written completeiy in interpretive code, it runs compiled 
Under tHe MAaiSP currently in use at the Vtificial Meilifence LaiMratory. aOGO has 
also been implemented on standard DEC P0P-10*s under the TEN50 and TEfEX systems, 
and on MULTICS. Those implementations are discussed in Section 13 and Section 12 of 
this memo. . , 
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Section 5. Getting Started 

. • • 

In the following sections, we will jo' inW iriore detaSVconcerninf the 
implementation of LISP LOGO, and provide some practical information for using it. We will 
not attempt' to provide the feeder with an introduction to the LO^Dt language; sever'al 
excellent sources for this^already exist, soch as the LOGO Primer, and the ULOGO User's 
mantial ((LOGO memo 7]. We will assume that the reader has' read these, or is already 
familiar With CLOGO or ULOGO, the other implementations of the LOGO language available 
at the Allab. Instead, we will concentrate on pointing out differences between LLOGO and 
other implementations of LOGO, and describing featUi'es unique to our implementation. It is 
not necessary -to Know' LISP to understand most ^f What follows, although some 
knowledge of LISP would be helpful in gaining insight into the implementation. For more 
information on LJSP, see the MACLISP Reference Manual by Dave Moon, and the Interim 
LISP User's Guide (Al n*mo 190J 

- . ■ ■ ■ r ■ 



Not^tional conventions: Throughout .this, memo, USER TTPEIN and LOCO CODE 
MdU appear in a font like thit. SYSTEM TYPEOUT wiN appear in a fftnl like this. Control 
characters are denoted by A followed by the character. You type a controrcharacter by" 
, ♦widing dowrt the control key whBe you are typing the character, S means escape or 
alt mode, not dollar-sign, except* where otherwise noted. Angle brackets < > mean 
something of the .appropriate type suggested within the bra<;ket8; for instance, if your 
user name, is HENRY, <usBr n8me> means your user, name, B.g. HENRY. Except for control 
characters, which usually take immediate effect, and except where otherwise noted, end 
all lines of typein with a carriage retura 

' The following procedure Is intendilJto help very naive users of ITS to tet logged 
In, and to. obtain LISP LdOO. See Al memo^lS, How To Get On the System, for more 
details. I 

1. Fmd a free xonsole. A console which is free shows, 

AMTS <ver«ion> CONSOLE <mimlwr> FREE. <Hme>. 

■ I ■ \ • 

2. A console which is free understands only one command. It is aZ. The computer will 
respond with the following messages: , , 

Al ITS <veraion>. DDT <viniaii>. 

<namber> USERS. 
^ <new«> ' ' 

* , ' ' ' * 

a Whert it stops printinf, login at rollow$: typ« 

tLOCIN <itMr mm€> 

if there are any messaf as for you, 

♦ • t\ 

-MAIL- ' ' 
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will be printed You can type ■ $pKe to rtcAtve it or any other character to postpone it. 
A ♦ will be typed at the end. "^^^ 

4, Now you have completed loffinf iii to the Al system. LLOGO it a subsystem of Al ITS. 
To iet LLOQO started, 

5. Decide which version of LISP lOGO you want. Choose from: 

LLOGO - Standard version of LISP LOGO. Vocpbuiary is compatible with CLOGO. 

ilLOGO - A version which uses a vocabulary which is compatible with PDPll LOGO. Se 
Section iTfor details. 

NLLOGO *The very 'latent version of LISP LOGOl This is experimental, so we make 
promises. 

When you decide which you yant, type \^ ^ ' 

^ ' ^ :<iieme e/ prefr«m> 
for example, :LIjOGO . 



6. Then LLOGO will print out some initial messages, includHig its version number^ and 

LISP*s and wiH ask you some questions. . , 

• * 

^ DOYOU WANT TO USE THE DISPLAY TUIlTtB? 7 

If you want to define and edit a procedure which contains turtle display comoitod^* you 
should answer YKS io tNs question. It is not necessary that ybu have the 340 display 
scope, or the* GT40 display, to do just dafinirif and editing... You can even run the 
procedure if you do not mind not being able to see what the procedure does. See Section 
15 for more information. * . *' 

OEHMLAND? 

If you want to play with GERMLAND, the display turtle for charKter displays such as 
OATAPOINT terminals, answer YES. This has a prompter which will run some 
demonstrations and provide help if you need it. Again, if you intend to define or edit 
procedures designed to run in (^RMLAND, you must inswer tKS. See Section 14. 

MUSrCBOX? 

If you want to use LOGO music box primitives, answer YKS. This will inquire further, as to 
which music box, etc. See Section 16. In case you have answered YES to any of these 
questions you have to wait for a while, because it takes some time to toad in the files. If 
you want to interrupt loadtng^n type aX , not aC. If you have a file named tWGO 
(tNIT) on your directory or there is a file named <iu#r fMiiii«> XLOCO. on the (tNIT) 
directory,* LLOGO will read it as an initialization file, executing LOGO code contained 
therein. When all this' is fihishedi LLOGO will indicate its readiness with ^ 
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LLOGO USTENINO 

? ' ■ 

* 

'7. If you find yourself in the unfortunate situation of meeting a bug in USP'LOGO,- you 
may report- it by using the function BUG. The input to BUG should be a message 
describing'the difficulty, enclosed in dollar signs. For example, 

/ 

IBVG I „ C; 

THE rVRTLE ESCAPED EHOM THE 
DISPLAY SCREEN .. . 

$ f- 
;THANKYOU. 

8. You can logout when you ^x€ finishtd by typinf GOODBYE LOGO. The ttrminal 
should then say, V • -s 

AND A PLEASANT DAY TO YOU! 

AI ITS <verskin> CONSOLE <iiymlKr> FREE <timt> . 



9. Have fun! 



-filing Started 

■ SO 
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, Thti se"ction will discuss a few of the more complex issues in parsing LOGO into 
LISPi end discuss how they are handled by LLOGO. LISP is trivial to parse, as its syntax 
is totally unambiguous. The application of a function to itiT inputs always happens in 
prefix notation, and the precise syntactic extent of a form is always clearly delineated by 
parentheses. LOGO syntax affords the faieginning programmer some conveniences .over 
LISP syntax, while retaining much of the expressive power of LtSP. Parentheses can be 
omitted surrounding every form, and the more customary infix notation for aritt^tic 
^expressions can be arbitrarily intermingled witfi prefix notation These convenieoces are 
bought at the cost of complicating the parser, and introducing some cases where 
ambiguity results regarding the user^s intent ^or^ some of the language's syntactic 
constructs. 



6.1 Infix Expressions 

LLOGO allows infix notation tQ be used as well es prefix (unctiomr in arithmetic 
^ expressions. Most LOGO arithmetic functions^ exists In both prefix end infix flavors, end 
^ the user is free to use whichever he desires. ^ - 

^ tPMNT 3*l*rif ASt/M FIUST :X DIFrKMNfX iC«ciy i 

f •* . , ... 

1% the sam* as - * i 

^ *PRINT(ftMKS3 4MBXPT:/l((FinST:X)*<TmESiCl7)-2)) 

4' 

ft / 

LLOGO observes the usual precedence and associativity of arithmetic operators. 

Mote that a complication of the LOGO syntax is that all functions, not ju^t infix 
operators, are required to have precedence levels. Is 

the same as ^ 

ITIMES (FIRST:/!) 17 or {FIRST (TIM BS : A 17) f 

The situation is further complicated by the user's probable expectation that functions . 
which manipulaM^ logical values have tower prKedtnce than cotnparison operators like <, ■ < 
> and So, ' . 

?TEST '.NUMBER < :PI 

is taken to mean, 

TTBST (LBSSP tNUMBBR :Pt) and not TLfSSf (TBST '.NUMBKR) iPI 

• • •* 
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CLOGO givjs$ ill arithmetic oparttors tht sama prtctdenca on tht f roundi that 
precedence would t>e difficult to explain clearly to children. However, this has the 
drawback of deviating from th* customary mathematical convention. Since the motivation 
for introducing infix notation into LOGO syntax is so that arithmetic expressions can be 
written in the infix f9rm in common use» LLOOO has been designed^to obey the usual 
precedence conventions. « ^ ^ ^ 

• * " ■ 

LLQGO tidies to please everybody. If you feel that th^ precedence scheme which 
has been implemented does not agree with your intuition^ you are free to redefir^ the 
precedence levels as you wish. LLOGD also provides the capability of defining new infix 
operitors. ' 

The inilial default (Accedence! are idipntical to those of ULOGO and ere ei 

follows: 



700: A [exponentiation] 
600: ♦ - [prefix] 
500: * / \ 

400: ♦ - [infix] ' ' 

300: [def au|;t pre.cedence for system and user functions] 
200: Of/ 1^ 
IQOJTNOT BOTH FATHER AND OR TEST ^ 
50: ^ [MAKE] 

Initiallyi operators of levels 50 and 700 are right associativei and the rest ere left 
associative, which is the default. Logical functions should have precedence lower than 
comparison operators, so if the user defines a logical function he should set the 
precedence himself, otherwise it will receive the default precedence. The user can 
change thirjgs by using the following functions: ^ 

PRECEDENCE <oi>> 

Returns the precedence level of <op>, 

PRSCEDENCE <op><hv4il> . ^ 

Sets ^op>'s precedence level to the specified <level>, which may either be a 
number, or another operator, wNch means that <op> is to be given the same precedence 
as that operator. * . 

PRECEDENCE NIL <Uv€l> 

Sets!,the default precedence for functions to <ievel>. All funcftent 'which ere not 
in the above list of infix functions, or have not been assigned a precedence by the iiser» 
receive the default precedence. 

ASSOCIATE <mmb0f^<mkteh^y> 

Declares that all functions of precedence level <number> will associate <which* 
way>, which is either ^LEFT or BRIGHT 

INFIX <0i^ <l0Ptl> V. 
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. Osfines <op> to^ be -wn infix operator of pr«c«de/Ke <level>. Specifyini • 
, precedence is optional. 

4 NOPRECEDENCE 

Forces all infix operators to the same precMience level (this WiH be hiifier than 
the default precedence]. Makes LISP LOGO look like aOQO [well, almost...} 

! ^ ■ .. 

tlNFJX 

This variable contain* a list of all cCirrent infix operators. Look, but dont touch. 
Use l/VJJ/X to add new infix operators, % 



6.2 Minus Sign 

There is some ambiguity in the handlinf of minus sign. For Hxample, consider 

KSESTENCE 3 -:A) 

If the minus sign is interpl-eted as an infix difference operator, tNs wilt result m a list of 
one element. If the minus sign is interpreted as prefix negation, it will result in a list of 
two elements'. CLOGO uses the spaces in the line to disambiguate this case. If there is a 
space between the minus sign and^he :A, W is interpreted as infix, Otherwise, it is 
interpreted as prefix. In ULOGO, spaces are not semantical^ significant except to delimit 
words, so this is interpreted •$ (SENTENCE (DIFFEREiilCE 3 m regardless of the 
occurrence of spaces. LLOQO treats minus, sign .as doea IILOQO. One would obtain the 
result of the other interpretation by using 

t(SENTENCE3(-.a)) 

The preceding discussion applies only to the parsing of infix expressions! So, /-4/ 
IS a list of one element.^ negative number, but /- 4/ is a list of two elaments. minus sign 
and 4. , 



6J Homonyms 

I) 

LLOGO makes ali«the functions of LISP directly accessible ta the LOGO user, in 
. . exactly the same way as LOGO primitives.. This runs, into difficulty when a LISP function 
and a LOGO function have the same name but different maanings. These are currently 
handled by the parser, which converts. them into innocuous atoms which do not conflict 
with LISP, and are reconverted upon unparsihg. Currently the following functions are 
homonyms: * 

pntm,RANmM,im,Em,sm[mm.'{^:^wA^] 

When the user types in one of . these, it is converted by the parser to an internal 
representation consisting of a different function name [LOCO-PRINT, WCO-LAST 
WCO'EDIT LOCO-R/INDOM or UKSO-SAH, as appropriate} When the user requftsts 
that the line be printed out or edited the unparser converts it back to the way it was 
originally typed in. In the aOGO-compatible version of LLOQO, when £ARE¥Vi.\% set to 
rwn-m the following primitives which conflict with CLOGO are also changed by the 
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parser: LIST is changed \o' PRINTOUT, DISPLAY fo STARTDISPLAY, GET and READ 
to RBADFILE, and DO to RUN, Warning messages are also printed in these cases. 

There is one pitfall in the current method' of handling homonyms: sometimes, as 
with passing functional arguments, the parser does not get a chance to do its thing, so 
the user may find an unexpected function called; APPLY 'PRINT .... calls USPs 
PU/W function, not tOGO's. 

6,4 Ahbrcvittions ^ 

Abbreviations are accomplished in LLOGO by putting tH^ name of the function 
which is abbreviated on the property list of th^ abbreviation as an EXPR or FEXPR 
property, as appropriate. Abbreviations are expanded into their full form on parsinf , and 
are left that way. The user has the capability of creating his own abbreviations by 

1/IBBREVI/lTE <nem narM> <oU nam§> 

and erasing them by * 

7ERASE ABBREVi/ITION <nmm^ 

ABBREVIATE evaluates its inputs, but ERASE 'doesn't. A complete listing of 
abbreviations can be obtained by doing 

1f>RINT0UT ABBREPIATIONS 



/ 
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Section 7. Defining and Editiir Fywctioiit 

" . In LOGO, when the user defines a procedure usinf TO, or EDITs a procedure lie 
Has previously defined, LOGO enters an "edit mode", where lines beginning with a number 
•re inserted into the procedure under modification. LOGO prompts with ">". rather than '^" 
to indicate this. The intent of having a separate mode for editing prmiiidures is to stress 
the distirKtion between defining procedures and executing them. TWs distinction is not 
strictly maintained; if the line does not begin with a number, the commands are executed 
as they would be ordinarily, with a few exceptions [the user is prevented from doing 
another TO or EDIT for instance]. Occasionally, this leads to errors, for instance if kht 
user forgot to type the line number at the beginning of a line intended for insertion. 

The default state of LLOGO is to retain the separation of edit mode from ordinary 
mode as in ULOGO and aOGQ. The slightly more sophisticated user, however, might find 
himself ir» an unnecessary loop of continually typing ED/Fs and END'S while working on 
the same procedure. Since, the lines typed by the user for insertion into a procedure are « 
inserted immediately when the user finishes typing the line, END does not cause 
anything to happen other than the termination of edit mode. The system always 
remembers the name of the last function mentioned by TO, EDIT, PRINTOUT, etc. as a 
default for these functions, so when working on a single function, EDIT serves only to 
enter edit>tHjde. The user has an option of turning off the separate edit mode by setting 
the variable tEDITMODE to NIL This will cause lines beginning with a number to be 
inserted into the default procedure at any time. In tNs mode. It is never necessary to use 
END, and EDIT will only change the name of the default procedure if given an input. 
The prompter will not be chartged. 

In LLOGO, it' is not necessary to be in edit mode to use EDITUNE br EDITTITLE 
on a line of the default procedure, and the editing control characters are available even 
when not in edit mode. 



7.1 Control Character Editing 

LLOGahas a control-character line editor similar to those in CLOGO and JILOGO. 
This make» it particularly convenient to correct minor typing errors, by providing a 
means of recycling portions of the line typed previously, instead of requiring retyping of 
the entire line. The editor keeps track of two lines: an old line which you are editing/and 
• new line, which LLOGO is to use as the next line of input. The old line is always the last 
line you typed at LLOGO, except immediately after a parsing error, when the offending 
line will be typed out at you, and it may be edited. You can also set the old line yourself 
to be a line in the curnent default procedure by doing EDITUNE <Hmi numher>, or the 
title of a procedure by calling EDITTITLE. EverytWng you type after the prompter, or 
cause to appear using the control charKters, is included in the new line, until you type 
carriage return, which terminates editing for that line. You may use parts of the old line 
in constructing th^ new line by using the following editor commands: 

A« - Get the next word from the front of the old line, and put it on the end of the new 
line. » 

AJJ - Put the rest of the old line at the end of the new" line. TWs is like doing aJPs until 
there is nothing left in the old line. 
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* ^ ^ I 

a5 - Delete a word from the front of the old line. . . ' 

5. • « 

aP- Delete a word from the end of the newJine.like^riJbout, except rubs out k word 
instead of a character.. 

LLOGO uses different charKters than IILOGO and CLOGO do because USP uses 

most of the control characters for interrupts and l/o. . 

7.2 Printine Fmictidn Definitions ^ . 

;: — 1 , ^ 

The function PRINTOUT ct^n be-usedio JpoK at definitions of user procedures. In 
addition, it has other options for examining the state of your LLOGO. PRINTOUT doesn't 
evaluate its inputs. 

PRINTOUT <procedure-nam9> fmrevimthnPOJ 

Will print out ^ definition of the specified procedure. If the name is omitted, it 
will assume the last f urfRion that was defined, edited, or printed. 

PRINTOUT LINE <numb€r> fPOLJ 

^ Prints out only the specified line in the default procedure. 

PRINTOUT TITLE <pr^Uur^> fPOTJ 

Prints the just the title of the procedure f ivea If the Input it omitted, prints the 
title of the current default procedure. TNs h useful if you forget which procedure is the 
default. 

PRINTOUT TITLES 7 POTS J 

Prints' the titles hi all current user procedures. Ignores buried procedures [see 
Section lO.lJ. ^ 

PRINTOUT PROCEDURES fPOPRf 

Prints out the definitions of all currently defined user procedures. Will not print 
the definitions of procedures that are buried [see Section 10.1]. 

PRINTOUT NAMES I PON I 

Prints the names arnl values of all user variables. ^ 
PRINTOUT ALL/ POAJ ' 

OOM% PRINTOUT PROCEDURES m^d PRINTOUT NAMES. 
PRINTOUT SNAPS 

Prints a list of saved display turtle scenes. See Section 15.11. 
PRINTOUT FILE, PRINTOUT INDEX 
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H»»int$ a;llst of all curroflt abbraviatiom^ and Hm nanwt of tha procedurat wWcfi 
•acH abbreviites. ' 

PRINTOUT PRIMITIVES ] 

' Pf ints a complate ll$t of all aO(» primtt^ 

. a '^P*'™^*^"' command is UNKPRINT, which ctusas a Kstinc, similar to'the 
output of PRINTOUT AIL, to appear on the line printer. It t«Kes an optional input, a 
^ word to be us«d as a title to name the listint fenerated' 

7.S Erasing ■ . * " 

^»™^*^ command fiRit^e will remove unwanted portions of your LOGO. The imHit<«to 
BRjWK are not evaluated. The options available are: 



Cause the definition of the specified object to vanish. Note: When yOu define a 
function using IV, it checks to see if there already exists a procedure of th^ same name, 
and If .so, inquires whether you want the old dalinitioH BRASEd, This is to prevwit you 
from accidentally overwriting definitions of functions. 

ERASE PRiMITIVE <pHmMv» mm»* ' 

The LL0GO. primitive given as input will be erased.' You might use tNs, for 
example, If you wanted to use a name used by LOGO for one of your own functions. If 
you define a name using TO which conflicts with a WGO priniltlvt, It will inquire If you 
want the definition of the primitive to be erased. * 

ERASE LINE <mmb0r> /ERL/ 

Erases line <number> of the default procedure. - 
ERASE NAMES fERN/ 

Unbinds til ui#r v»rwbte«* 
ERASE PROCEDURES [ERPJ . 

-A^''***' *" '"^•''P''"*'^* functions. Does not affect compiled or buried 
ERASE COMPllED 

' Erases all compiled user functions; ^ 
ERASE ALL f ERA/ ° . 
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Uke doing ERASS PROCEDURES, ER/ISE COMPILED and ERASE NAMES: 
ERASE ABBREVIATION <abhMviati0H> 

Erases the abbreviation given m, input. Qoe% not effect tiie procedure that it 
ebbreviates. 

■ ■ ■ V 

ERASE FILE <fae tptO jERFJ " 

• ■ , ' • * * 

Sea Section 10.2. 
ERASE TRACE <runction> ftRTR/ 

Removes trace from <function>. See Section i6.° 

ERASE BURY <fknetioni> fERB/ 

The functions will no longer be buried For ■ discussion on burjed procedures^ see 
Section 104. 
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Section 8« Error Handlinc ind DdHiggiitg 



The philosophy of ^ the LISP LOGO error handKng system is to try to be as 
forgiving fs possible; the system will give you an opportunity to recover from almost any 
type of error [except a bug in LLOGO!} There are two types of errors which can occur: 



8J Parsing Errors ' 

If for some reason, LLOGQ cannot parse the line you typed [for example/yOu may 
have typed mismatched parentheses^ tNs causes a parsing error. When this happens, 
. LLOGO will print a message telling you why it was unhappy, retype the offending line at 
you, and type the editor prompt character. You now have^a chance to redeem yourself 
by correcting the line — you may use eny of the editing control characters [see Section 
7.1]. When you -are satisfied that the line is correct, type carriage rejurn, and LLOGO will 
resume evaluation, using the corrected line In place of the one which was in error. 



8>g Run Time Errors 

^ When a run time error occurs, a message will be printed. If the error occurs 
inside a LOGO user defined function, the message will say something like: 

sERHOn IN LINE <mimber> OF <piicaim 

;UNE <numiier> IS : 

^ ^ S^rcasun for errors 

If the error occured inside a LOGO prtmitivi, the message wilt look like: 

;COULDNT EVALUATE <bed lonn> 

;BEPAUSE 

f<reeion far temir> 

. where <bad form> is what LLOGO-was trying to evaluate when the error occurred. 
Usujily, this will give you enough information to figure out where the error occurred, 

^ although <bad form> is sometimes uninformative. Lkually, LLOGO will simply return to the 
top level loop when such an error occurs. However, if you SETQ the variable 
:ERRBREAK to something other than NIL, [or MAKE 'ERRBHEAK . , - ] a rqn time 
error will cause a LOGO break loop to be entered after the message is printed. Setting 
the variable tUSPBRBAK to non-NIL will cause a LISP style breakpoint' to occur when 
an error ^happens. [For *a detailed discussion of breakpoints, see below, Section 
You cart resume execution of your program fromihe point at which the error occurred, 
by CON^iNUE'm^ with something to be used in place of the piece of data which caused 
the error. If the error was an undefined function, you may WNTthlUE with the name of 
a function which has a definition. If the error was an unbound variable, CONTINUE with 
a value for that variable* H the error was a wrong type of input to a LOGO primJtive, 
CONTINUE with some appropriate value for an hiput to that function, etc. Usually it will 
be obvious from the context what sort of item is required Computation will be resumed 
from where the error occurred, with the returned item substituted for the one which 
taused the error, [^k>te: the usual LISP interrupt handler functions expect a list of the 
new item to be returra^d, wNle LLOGO*s expect simply the item]. The LISP LOGO run-time 
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error handling works by Qtilrzing the USP error interrupt f^'lity. If you don't like the 
way LLOGO handlers any of the error conditions, you are free to design your owa error 
interrupt handlers^ either in LISP or iij LOGO. 

«■.• '■ 
8J Breakpoints 

A powerful debugging aid is the ability to cause breakpoints. Stopping a program 
in the process of being evaluated allows the user to examine and modify its state, and 
explpi'e the history of evaluation which led up to the breakpoint* LISP provides excellent 
faqflities for doing this, including automatic generation of breakpoints when an error 
occurs. Whenever LISP starts to evaluate a form, it^first pushes the form on a stack; from 
a breakpoint one can examine the stack to determine what forms were in the process of 
being evaluated, and perform evaluations relative to a particular stack frame* LISP COGO 
attempts to make these features easily available to the user» from either LISP or LOGO. 
Versions of these breakpoint functions are also available which can rgn in an ordinary 
LISP, without the rest of the LOGO environment. The following facilities are available for 
causing breakpoints: 

IJOCOBRKM <inu$agt> <coniiiion> <retum-value> f Abbreviation P/HJSFs/ 

The inputs are all optional, and are not evaluated. Unless <condition> is given and 
evaluates to NIL^ WGOBREAK causes the user to enter a loop where LOGO commands 
can be typed and the results printed. This is similar to the top level loop except that 7. is 
printed as a prompter rather than ?; it is very much like repeatedly evaluating PR/iVT 
RUN REQUEST. If <message> is present, it will be printed out upon entry to the break 
point. It also prints the form in the current stack frame> which will be the call to 
LOCOBREAK if called explicitly by the user. If the breakpoint happened because of an 
error, the initial stack frame will be the one containing the form which caused the error. 
LOCOBREAK tries wherever possible to print out the current form as LOGO code before . 
it enters a LOGO'break point. However^ the current version is not always smart enough 
to distinguish between USP and LOGO frames on the stack, so you might occasionally see 
what looks like internal USP garbage there. If you go up far enough, you are sure to find 
the LOGO code. A smarter version could recognize the LISP frames and ignore them. The 
third input is a default value for LOCOBREAK to return if it is CONTINUED [See 
description of CO/VTfA/iyE, below] Caution: the breakpoint functions described in this 
section use USP*s CATCH and THROW. Unlabelled THROWs from inside a breakpoint 
loop are highly discouraged. 

If control-A is typed at any time, even while a program is running, it wilt cause an 
interrupt and a LOGO break point will be entered 

LISPBRKAK <meiiag0> <eoniiiion> <rtiurii value> fAbb. BREAK/ 

This is like LOCOBREAK, except that the loop is a USP (PRINT (EVAL (READ))) 
loop. This is especially useful when debugging a <iet of LfSP functions designed to run in 
LOGO. To access your LOGO variables and user functions from inside a LISP break loop, 
prefix them with a sharp sign [V]. LISP users note: you can interact with this break 
loop as with the standard LISP BREAK function, except that it is set up to allow use of 
the stack hacking functions described below. If SP is'^typed, or (CONTINUE) invoked, the 
<return vvalue> will be the value of the call \o LISPBREAK. 
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AH 

A$ in USP, aH typ^d at any timt will mNrrupt and cauM a USP breakpoint to 
entered . 

tERRBREAK 

If this variable Is not NIL, when a run time error happens, WGOBREAK will be 

■ find out what went wronf, and recover 

by COiVr/M/Bing with a new piece of data to replace the one that caused the error. ItMs 
initially set to NIL 

iUSPEREAK 

U\^B :ERRBREAK, except that if Mt to somethim other than NIL, when an error 
happens, LISPBREAK rather than WGOBREAK mW be called. Initially set to NIL 

The followint functions can be called from inside a breakpoint tq examine and manipulate 
the stack: 

VP 

if 

Moves the breakpoint up one frame in the slack, printing put the form which was 
•bout to be evaluated in that frame. This will be the form which called the one wNch was 
last typed out by any of the functions mentioned in tMs section. Evaluation now takes 
place in the new stack frame. This meant that all local and input variables will have the 
values they did when that form was about to be evaluated However, side effects such as 
assignment of global variables are not undone. Frames are numbered for the user's 
convenience, from 0 increasing up to top level. 

VP <Humbtr> 

Goes <number> frames up the stack. Like doing l/P, <number> times. The 
<number> may be negative, in which case, the breakpoint is moved down the stack rather 
than up. . 

VP <atom> 

Goes up the stack until a call to the function whose name is <alom> is found. 
VP <aiom> <Httmber> 

Goes up the stack until the <number>th call to <atom> is found. Searches 
downward for the <number>th call to the specified function If <mimber> is negative. 

EHHTN <atom> <immber> 

Like UP, except that it proceeds down the stack instead of up. Both inputs are 
optional, and default as for VP, except that <number> defaults to -1 instead of +1. If 
<number> it given it is equivalent to VP «. ('<mmi*r>). 

PRINTVP <»tom> <immber> 



Erver HMidling ami Debugfing Section 83 

31 ' 



USP LOQO MEMO 



Page 27 



June 27, 1974 



Accepts inputs as does UP, but instead of moving the breakpoint up the-sticipo 
the desired frame, all frames between the current one and the one specified are printed 
out. This function is good for getting a quick view of the stack in the immediate vicinity of 
the breakpoint. The breakpoint remains in the same frame as before. The two inputs are 
optional^ and default as for UP. 

PRINTDOWN <atom> <number> ^ 

Like PRINTUPf except that the inputs are interpreted as for DOWN rather than 
as for VPt that is, it prints frames going down the stack. 

EXIT <return-VQlue> , 

Caused the current stack frame to return with the value <return-value>. That is, 
the computation continues as if the form in the current frame had returned with <return'* 
vjlue>. The input is optional, and defaults to NIL 

CQNTINUE <return'valu€> fAbbreviationt CO, $PJ . 

Causes the frame of the originally invoked breakpoint to return with the specified 
value. The input is optional. Use CONTINUE to return a new item of data from inside an 
error breakpoint; for instance a new function name \f> use in plice of on^ which was 
undefined Note that in many situations^ for example from a user-invoked breakpoint or 
from an error breakpoint which expects ari ifem to be returned as the value of the form 
which caused the error, if you haven't moved the breakpoint around the stack,- 
CONTINUE will be identical to EXIT. If the input to CONTINUE is omitted, the default 
return value specified by a third input to LISPBREAK or LOCOBREAK will be returned 
as the vajue of the breakpoint. If no such default return value was given, NIL will be 
returned/ 



Here's an example: 
7M/IKE *ERRBREAK T 



r 

!Assur« LOGO braaK happens! 
!wh«n an error occurs! 



{CHANOtNQ A SYSTEM NAME 
T 

?710 SCREWUP :N !Defin« our losing procedure.! 

>I IF :W-0 THEN OUTPUT :UNBOUND ' 

' iCount down to 0, then! 

>2 OUTPUT SCREWUP :N-I ^ 

!eval variable which has no value! 

>END 

;SCREWUP DEFINED 
1SCREWUP3 

iERHOH IN LINE 1 OF SCREWUP 
;LINE 1 IS: IF :N-8 THEN OUTPUT :UNDOUNO 
itUNDOUND Ig AN UNBOUND VARIABLE 
:BREAKP0IN7 FRAME B: iUNBOUND 

,t:N !Frame 0 is the variable. Eval was! 

8 Iworking on this when we bombed! 

, !We can dp any command! 
•while in the breaKpoint.! 
7XJP !Going up a frame. :l//VBOl//VO! 
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iBREAKPOINT FRAME 1: tWTPUT :UNBOUND 



rtDOWN 
sBREAKPOIHT FRAME 8: ^UNBOUND 
WP *SCREWUP 

;BREAXPOINT FRAME 4: SCRBWUP :N4 



!wt$ the input to OUTPUT. 
fgoing down « f r»m«'.! 



!wt arrivt at rtcursiva invocation! 
!wbara:lVhad tha valut 1! 



1 

WP 'SCRBWUP 2 

;BREAKPOINT FRAME IB: SCREWUP :N"1 

TUN , 
3 

tEXIT 'SCREWED 

SCREWED 

T 



!Wa dacide for soma renson! 
»hat 5CRKir(/P of 2 is ! 
Ro return tha value 'SCREWEDl 
land all the previous Invocations ! 
iof SCREWUP return with the value! 
rSCREWEB and we are at top level! 
iWasnn that fun?! 



hN was 3.! 



!H we rise past 2 calls to S(iglEWUP,\ 



BA Vffont Nombcr of Inputs Errors 

Since LOGO syntax requires that the parser know how many inputs a function 
requires, and LLOGO parses your input as you type it In^ errors may be generated if you 
change the number of inputs a function takes by redefining the function, or by catling 
EDITTITLE. Calls to that function wNch you typed previously are now incorrectly 
parsed. LLOGO will catch most occurrences of this whan the function is called, and print a 
message like: 



and attempt to recover. LLOGO always attempts to reparse a line which caused a wrong 
number of inputs error. It is not always possible to win, howeverAas side effects may 
have occurred before the error was detected \ 



Versions of LLOGO running in BIBOP USP [LISPs with the capability of dynamically 
allocating storage] have special handlers for garbage collector interrupts. If it decides 
you have used too much storage space of a particular type» or too much stKk space, it 
will stop and politely ask if you wish more to be added If you see these questions 
repeated many times in a short span of time while running one program you should give 
serious consideration to the possibility that your program Is doing infinite COiVSing or 
recursing infinitely. 



;REPARS1NQ LINE <iiumli«r> OP <pracedhrt> AS: xaaw parsi> 



8,S Garbage CoHector Errors 
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8>6 Tracing! • ^ 

\ 

The standard LISP TRACE pKkase may be used to trace LLOGO primitives or 
user functions. The tracer is not normally resident, but is loaded, in when you first 
reference it. See the LISP manual for details on the syntax of its use and the various 
options available. * 



8.7 Interaction with LISP 

In debugging functions written in LISP for use in LLOGO, ^t is often useful^to be 
able to switch back and forth between LOGO and LISP top level loops. You can leave the 
LOGO Jop level loop and enter a LISP READ-EVAl-PRINT loop by using the LLOGO 
function LISP. From this mode, executing (LOCO) [remember to type the parentheses, 
youVe in USP!] will return to LOGO. Typing control-atsign [as] at any time will cause an 
interrupt and switch worlds; you will enter LISP if you typed ao from LOGO, or enter 
LOGO if ybiHyped it from USP. The USP loop gives you access to all intereal LLOGO 
functions ano global variablesi which are normally inKcessible from LOGO since^they are 
on a different obarray. LLOGO primitives and system variables are on both obarrays, so 
they will be accessible from both USP and LOGO, but LOGO user functions and variables 
are on the LOGO obarray only. The character sharp sign [V] is an obarray-switching 
macro; to access LOGO user functions and variables from the LISP loop, prefix them with a 
sharp siga 
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« Section 9. Compiling LLOCO Uier Proctduw 



LISP LOGO compiles a LOGO iource program into LISP and it is stored internally 
only as LISP code. Since this is the case, the LOGO usir has the capability of using the 
USP compiler directly on his LOGO prograrts, and obtain a substantial gain in efficiency, 
once his programs are thoroughly debugged. LISP LOGO provides an interface to the LISP 
compilei' which should make' it unnecessary for the user to worry about interactim with a 
separate program. 

To compile all of the functions currently in the'workspace, the /unction CQMPH.E 
IS available. [This does not include buried procedures — see Section lO.i.] It expects 
one word as input, to name the file which will contain the compiled code. The names of 
the functions which are being compiled will be printed out. A temporary output file 
[named ./^O. OUTPUT] will be written on the current directory and deleted "after the 
compilation is complete. The output file will have as first name thk input to COMPILE, 
and second file hame F/ISL [In the MULTICS implementation, the tempomry fil* will be 
named logo output and placed in the current directory. The output file wi« appear in the 
working directory, with one name, the input XHtOMPILE.] Since the LISI» compiler must 
be called up as a separate program, be careful about interrupting the coo^ilation before 
It IS finished [for instance, by /\C] as you will not find yourself in LLOPO anymore. 

To load a compiled file into LLOCa say READFiLE <nmme> F/ISL This will load 
all the compiled functions, which were compiled by COMPILE <iHime>, an^ also restore 
the values of variables that were defined at that time. The names of compiled functions 
will be kept on a list called COMPILED and not on CONTENTS. For debugging 
purposes, you might want to read in both the compiled and interpreted definitions of the 

t'fTcl'illSlir^';..™ *^ functions FWSIICOMPILED and 

FLUSH INTERPRETED to switch back and forth between compiled and interpreted 
definitions. , 

The LOGO COMPILE function supplies declarations for LOGO primitives. Some of 
the declarations include LISP macros which replace calls to LOGO primitives with calls to 
their faster LISP counterparts for, efficiency, and some optimization is done. For safety's 
sake, ill variables are automatically declared SPECI/IL However, the sophisticated user 
IS free to include in his program DECLMEs. to UNSPECI/IL input or local variables 
which he Knows will not be referenced globally, or provide declarations which wil^ make 
use of the fast-arithmetic USP compiler. 

A few warnings about compiling LOGO procedures: First, remember that LOGO 
syntax requires that it be known how many inputs a function expects, before a decision 
can be made as to how to parse a line of LOGO code. If, when defining a procedure, you 
include a call to a procedure which is not yet defined, parsing is delayed until run time 
[see Section 6 and Section 3.2 of this memo for more details]. The compiler, of course, 
cannot do anything reasonable with an unparsed line of LOGO code, so all parsing must 
be completed by the time the definition of any procedure is compiled. The COMPILE 
function attempts to make sure this is the cne. Therefore, it is an error to attempt to 
dompile a procedure which contains i cill to a procedure which is not a LOGO primitive 
and has not yet been defined. 

I ■<<•» • ^^^°'J^ ^ remembered that compilation of LOGO procedures, like, those of 
LISP, 15 not foolproof". It is not always the case that a procedure which rur/correctly 

CmfXImt LLOOO User Proodum , ^. S;^,j^ 9 
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wh«n inttrpretidi will be guaranteed to run correctly when compiled. Self --modifying 
procf dure$» Weird control structures, and in general procedures which depend heavily on 
maintaining the dynamic envirdnment of the interpreter may fail to compile correctly 
without modification. 
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Section iO. Usiiic Filet in LLOCO 



A file sptcification on ITS has four compontnts. Etch fil« is named by two words,^ 
of up to six characterif eacK a device [almost always DSKX and a directory name [usually 
the same as the user^s name]. You ^an refer to a file in LOGO by usinf anywhere from 0 
to A words. If you leave out the name altofetheri it witl be assumed that yoii are 
referring to the last file name mentioned One word will bf taken as the first file name, 
end the second will default to >, which means the htfhest numbered second file^^me 
which cun^ntly exists if you are readinf, or one higher K you are writing. Two words 
^ will benaken as the two file names, and the directory and device will be defaulted If 
three names are given, the third will be assumed as the directory name, and the device 
will be OSK. If four words are given, the third is device and fO{urth is the directory. Here 
ere some examples: 



[Assume that the current user name is ESG^ and FOG 3 \% the highest numbered file with 
FOG as its first filename] 

LOGO ITS [<fnl> <fn2> <dey>:<^ir>i] 

iREADFILKFOO m> DSKtESC; /FOO 3j 

7SAVEF00 F00>DSK:BSG;fF00 4j 

IREADFILB FOO BAR FOO BAR DSKiKSG; 

tRKADFtLB FOO BAR H£NRV FOO BAR DSKMENRY; 

jREADFIlt FOO BAR VSK HENRY FOO BAR D$KtHENRY; 



See Section 12.2 and Section 13 for information about file specifications on the 
MULTICS and TEN60 implementations. File specifications are accepted by LOGO in the 
same format as on ITS, so it may not be necessary to change any code to- run on other 
' implemenlations« 



10.1 Saving and Readiiig Files - 

There are two ways of storing LOGO programs on. the disk for later use. To store 
the contents of tlie current workspKe [all user functions and variables currently defined] 
on the disk in the form of LOGO source code, use- SAVE. It expects as input a file 
specification, as discussed above. The file created will contain the contents of the user^s 
workspKe, function definitions and MAKEt for variables, exactly in the form that he 
would serjif he did a PWWWr >1iL • 



Workspaces can alst^be saved in LISP format, as they are represented internally 
by LOGO. This is accomplished by the function WRITE which takes its inputs as does 
SAVE. Although the file created will not be so pretty to look at if you print it, using 
WRITE produces files which are considerably fastifP to reload, since the program does. 
rK>t have to be reparsed. For long-term storage of programs, however, it is recommended 
that you use SAVE rather than WRITE. Changes in the imptementation of LISP LOGO mey 
result in changing the internal format of LOGO programs, in which case, files created by 
iritfrff would not remain compatible, but files created by SAVE would remain so. 
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To reload ■ filf from the disk, use the function REflDFILE. This accepts a 
standard file specification, and reads it in, printing the name of the.file. RE/II>FILE does 
not care whether the file is in SAVEdor WRITlen form. If the file was created by SAVE, 
lines of code will be printed out as they come in from the disk. For written files, only the 
names of functions and values of variables will appear. If you get annoyed at all this 
output, you can shut it up with aW, LOGO will return with a question mark when the 
loading is complete. ^ . . ^ 

It is often convenient to treat a set of functions as a -pKkage'' or "subsystem-. 
For instance, you may have a set of your favorite functions which you place, in your 
initialization file, or a set of functions designed for a specific purpose. When this is the 
case, it is inconvenient to have all these functions written out when you are working on 
additional procedures, or have to see their definitipni when you do a PRINTOUT ALL 
That is, one would like a method of having the pKkage of functiom; available, but not 
considered as part of the workspace by certain commands. Ydu can do this by using the 
function BURY. It takes unevaluated procedure names as input^^.and will assure that the 
function is ignored by the following commands: PRINTOUT PROCEDURES, PRINTOUT 
ALL, PRINTOUT TITLES, ERASE PROCEDURES, ERASE ALL. SAVE, WRITE and 
COMPILE. Otherwise the function is unaffected, and can be invoked, printed, edited, etc. 
A list of the names of buried procedures^ kept as the value of the variable :BURIED. 
BURY ALL wilt BURY all currently defined procedures, and ERASE BURY will undo the 
effect of a Bl/RK. 



10.2 Other File Commands 

* - ' . 

PRINTlMJT FILE [abbreviated POF] will print out the contents'of a file. ER/ISE 
FILE will ca/se the specified file to vanish [This hat a safety check to make sure you 
don't do aching youll be sorry about]. These take file names as above, except that if 
only one^put is given to ERASE it defaults to <, the least numbered second file name, 
again for safety reasons. PRINTOUT INDEX fPOIJ will print out all the file names in 
the directory specified by one word. USE will change the name of the default directory. 
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StctkHi II. PiffcreiiCCT between ULOCO «»d LLOCO 



LISP LOGO w^f oriiinelly written to be compatible with dOGO, e version of LOGO 
written in POP.IO e«$embler lanfuafe. There now exists a version of LLOQQ wliich'wt 
bilieve to be "semanticalfy compatible" with the PDPll versloa By this we mean that the 
vxabiHary is the same - any primitive, Jn IILOQO also exists in LLOGO and will 
(iHipefully) have the same meaninf. aOQO in fact has many primitives which do not exist 
in llLOGa as well as offering the user access to the fuN capabilities of LISP. There are 
substantial differences between LLOGO and IILOGO with regard to fHe systems and error 
^ handling , and somewhat less substantial dHferences In the editor, turtle and, musk 
Mckages. These are described in detail in other sections of this document. There are also 
aire several less substantial differences, not mentioned in the preceding discussions, and 
what follows is an attempt to provide a reasonably complete list of the Knowledge that m 
experienced IILOGO user would ryed to use LLOOa 

h ULOQO, the double quote charKter " Is used to specify that the atom foMowInt 
it ic not to be evaluated^ 

WO 

It is liKe LISPs single quote, except that it also affects the LOGO reader's decision about 
when to stop including successive characters in forming the name of an atom. In , 

SPRINT :F00*3 

the plus sign is a separator character; it signals the end of the atom sFOO just as if there 
was a spece following :F00. However, following a double quote, the only separator 
characters recognized are space, carriage return, and square bracKets. Thus, in ULOOQ, 

FOOtS 

In LLOGO, the user may use the USP single quote to specify that an atom or 
parenthesized list following the single quote is not to be evaluated. The presence of the 
tingle quote does not change the way aOQO decides when an atom ends. In LLOGO, 

*PKtNT'F00*3 s r ^ 

jTHEmfUT'TOOTO + ISOPTHBYIfnOMaTYPE ^ 

because the plus sign is still a separator character. UOGO uses the double quotes aa 
aOGO doest they are always matched If one s-expression (atom or list) occurs in 
between double quotes, it is quoted. If more than one occurs, the list containing them la 
quoted. The correspondence between LLOGO double quoted expressions and USP •- 
expressions is as follows: 

«> m 

"(<$!>., <tN>r ">(QU(rrB(<ii>,..<tN>)) 
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'Square brackets' in llLCXaO specify quoted fists. Parentheses are never ufed 
around lists as in USPt but are only used to delimit forms. UOGO recognizes square 
brackets as well as U.SP's parentheses in denoting lists. The difference between brackets 
and parentheses in LLOGO is that the brackets always denote list constants, and not 
fbrnis, and that the outer level of brackets is implicitly quoted: 

nf^00 mn]]-^^> (QUOTE ((too B Am , 

There is • minor pitfall in the current implementation: nole^that top levels parentheses 
implicitly quote the list) interior ones do not. This does not always work, for instance 
when using HUN one may expect interior* lists also to remain unevaluated: . 

?PR/iVr [PRINT fFoh BAR/ J (PRINT '(PRINT (FOO BAR))) 

PBINT (FOO BAR) ^ 

?RUN f PRINT /FOO BAR J J --> (RUN '(PRINT (FOO BAR))y 

prints the value of the function FOO applied to input BAR. 

Square brackets in I ILOGO also sH&re with double quotes the propert]^ described 
above of affecting the LOGO reader^s decision on ending the names of atoms. Within a 
square bracketed list in IILOGO, an atom is terminated only by a space^ carriage return 
or bracket. This property is not true o,f square brackets in LLOGO. In UOGO, fFOQ^S/ is 
a list containing three elements, but in IILOGO, it contains only one element. 

String quoting in LLOGO is accomplished using the dollar sign character^ 1 LLOGO 
will treat anything appearing between dollar signs literally, with special characters devoid 
of any special meaning. Within such a string, two consecutive dollar signs will be^ 
interpreted as a single- dollar sign. So, $$$$ would be the word whose name is a single 
dollar sign. $$ is the empty word. Rubout, editing and interrupt characters cannot be 
quoted in this manner. Use the ASCII function of LISP if you really need them. 

The character sharp sign [V] in I ILOGO is used as a prefix macro character 
which takes one input which must be a word, and executes it as a procedure. It is Used 
where one wants to use a weird name for a procedure, or a name already used by the 
system. Sharp sign is used as an escape to tail that procedure. Thus, a procedure 
defined in IILOGO by TO ""PRINT . . . would be called by iTPRINT^ 7Y) . . . would be 
called by 0% etc. In LLOGO, sharp sign is used as a macro charKter which causes the 
next s-expression to be interned as if it were read in LISP if you are in LOGO, or as if it 
was read by LOGO if you are in LISP. If you are in the LISP mode of LLOGO and want to 
access your LOGO variables, you can say mFOOt etc. The conflict may be changed in the 
near future by altering LISP LOGOV macro character to one that does not conflict with 
llL(yaO/Suggestions welcome. 

The Boolean [logical] constants in IILOGO are TRUE and FALSKt while in LLOGOi 
they are T and NILt as in LISP. 

The ULOGO function LEVEl^t which returns the current procedure depth, js not 
implemented. 

IILOGO form^ are divided into two categories: those that output [return a value] 
and t)|0$e which do not. In LLOGO, at in LISP, every form returns a value. To simulate 
1 ILOGO and CLOGO in this respect, as a special hKk, forms which return a question mark 
do not have their values printed by LLOGO's top level function. However, LLOGO cannot 
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catch th^ airror of such • form hiding ih$tde parentheses, as can lllOGO, Most of the 
primitives which icto not return a value in, llLOGK) retw^ 

, ■ • ' • ' "• * . . ■ ■ ■ • . ■ 

The character : in ^11 LOGO is treated as a macro "^the value of ...Wi A is bound to 
B and B,ls bound to C, then is^a In LLOGO, variables set by If /TKB are just LISP 
atorbs beginning wHIrthe character v so will be the value of the variable set by 
MAKE ""t/r <$0hatever>9 etc.» We are seriously considecing changing this, eliminating the 
jncbmpatibility. The present setup requires JBfiWfB to do an expensive EXPWDB W the 
variable name, in order to create the word which begins with a cQion. 

LLQGO expects to firjcJ only one form inside parentheses; constructs like ' 

/, * ' ■ ■ ' ; , - ■ 

?(FD m FD S0 $UM^4S) 
' , ' ^' \^ ^ •. ' . . . • ■ . ^ 

are prohibited. 11 LOGO allows more than one form inside parentfueses und^r certain 
restrictions. 

/The IILOGO procedure TBXr, which returns a list of lists wfiich are the lines of 
a procedure whose name is given, as input, is not implemented in LLOGO. Howevert-, you 
can access the definition of a function in its parsed USP form on the property list [Cbi;] 
of the atom. 

Comments: LLOGO* understands two comment conventions: LISP's convention of 
treating as a comment anything between a semicolon and the next carriage re\urn, and 
LOGO'S of ^treating as a comment anything in between excllmation points. [The 
exdirinAiQ^ ^lOlnts must be matched, and comments can be continued past the' end of the 
li|eX Anyi^ing after exclamation points on a line is ignored. 

• The top' level loop in LISP LOGO is a RBAD-EVAL-PMNT loop whereas POPll 
LOGO Is a RMD-EVAL loop. This means that llLOGO prints out only when you ask it to 
f>rlnt i^nlike LLOGO which prints out values after every evaluation of » LOGO^orm. 

^ In ULOGO; ' 
\ ISUMiB 

i YOilDONTSAY WHATTODOWrma ^ 

In LLOGOi . ■ - 

?SVIH * * 

. - • 

Line numbers can be any intt^er inside the INUM limit Floating point, negative 
numbers, and zero are allowed also. ^ 

Percent sign {X) does not echo as a space. Carriage returns witWn square- 
bracketed lists pVint out-as such, not as spaces, as in ULOGO* • 

. :EMPn is the empty list, which is LISP's NIL tEUPTYW is the empty word, 
which is the LISP atom whose print name \s (ASCII Of. • 

The character cdntro)-T [AT] is converted to double quote ["] when it is read in. 
This is for compatibility with CLOGO. I.haveni the faintest idea of why CLOGO does it. 

\ ■ . Ki--. ■ 

LISP^LOGO and IILOGO differ On the syntax for arrays. USP LOGO uses the LISP 
array facility; to define an array use: 
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1 ARRAY <ni»m0>T<iimtnaoHl>...<iimenttonN> 

Values can be stored by - 
7$WRE <anay name> <sub$cript i> * . <mb»cnpt Pf> <wlue^ 

Values are accessed as if the array were a functi9n, which expected the same number of 
inputs as the number of dimensions in the amy, ' 

The LLOGO function RANDOM^ of no inputs, returns a random floatfng point 
number, which Is between zero and one. If given two arguments,,it returns a random 
number between its first and second argument, Inclusive. If both its inputs are fixed 
point, it returf)s a fixed point number, otherwise it returns a floating point number, 
(Ril/VflOM 0 9> behaves as ULOGO R/l/VDOJIf. 

LLOGO has only one global test box. When a subprocedure performs a TEST the 
result replaces the result produced by any TESTs prior to the subprocedure call in its 
• ^uper procedure, iFTRUE'^ and IFFilfcSE's after the subprocedure call in the 
superproce'dure will be conditional on the last TEST which Was performed, regardless of 
what procedure it was in. » 

ROUNDOFF in LLOGO takes either one two inputs. If given one input, the 
number is rounded to an integer, otherwise i|#|ounjded to as many places to the right 

of the decimal point as specified by the secof^j^put" 

' • , ■ ^ ^ ^'i-. ' ' ■ ■ 

llCX:/lfc variables are handled differently \k LLOGO than in IILOGO- Regardless of 
Where a WCAl statement is placed in a procedure, the variables declared will be local to 
the- entire procedure. This corresponds lo • PROG variable in LISP. LOC/lf, wcepts any 
number of variable names as input. *^ 

Inserting lines into procedures under program control should be done using the 
function f/V5ERn//VE. In 11 LOGO, the following will insert a line into BI.ETCH when 
JWt/W is executed: 

ITO MUNG <> . 

>W EDIT BLETCH ' 

>20 10 PRINT I NEW LINE ADDED TO BLETCH/ 

>END 

This will hot work in LLOGO. Instead replace line 20 with: ' 
>20 INSERTLINK 10 PRINT (NEW LINE ADDED TO BLETCH/ 

There is a memo by Wade Williams which explains some of the finer points of 
IILOGO iyntfx, and should be consulted for further information. The 11 LOGO User's 
Manual should also be of assistance. 
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SectioH 12. U$ing LLOCO on MULTlca 



LISP LOGO Jias now bo«n implenwnttd on MULTICS, «Td thl$ is the only version of 
LOGO aveilable for tt«| system. Below are instructions for using it, end e list of 
differences t)etween the MULTICS and ITS versions. Except for ttie differences in file 
neminf conventions, and limitations"itnposed by the operating system, source language 
programs should be entirely compiitible. For more information on MULTICS LISP, see the 
MACLISP Reference Manual by Dave Mooa 

^ The LISP LOGO fhusic package is available for use on MULTICS. See Section 16 for 
more details. The display turtle and GERMLAND packages are not available in the 'MULTICS 
implementation. MULTICS does not have adequate facilities for using displays such as the 
340 and the GT40. It probably would be possible to implement a rudimentary turtle 
package for the storage type displays on MULTICS such as the AROS and TEKTRONIX 
terminals, but we have no plans to do so at present. We do hof>e to have available soon, 
however, facilities for using the mechanicai floor turtles tcontroHed by the Thornton Box] 
on both ITS and MULTICS. 



12.1 Where To Find It . 

To obtain LISP LOGO, you must first create a link to the necessary files. After 
you log in, type 

littk >mi4>mp>m>Ut» • 

This needs to be done only once for each user. Subsequently, you can let LLOQO simply 
by typing ' 

You should then^ a message indicating the version numbers of LISP and LOGO, as on 
ITS, and the allocalbs^ill ask you if you want to use the music box. If you have a file in 
your directory named i<enj»p,/»f» it will be read in as' an initialization file. 

12.'2 File Naming Conventions 

An ITS file specification consists of two file names of up to six characters each, a 
device and directory name. A file specification on MULXICS^ls calfed a "pathname", and 
consists of arbitrarily many components each naming a hode in a tree structure of 
directories and segments [files]. The components of a MULTICS pathname are separated 
by ">" characters. Any pathname beginning with ">" is considered to be a full pathname, 
i.e. start at the root of the tree, otherwise, it is considered to be relative to the directory 
which is currently the defaulL This will usually be sometNng like Vudd>your-project- 
name>your-user-name". File names are assumed also to have two components as on ITS 
and you type them into to LOGO the same way, as two words, except that each word is 
not limited to six characters. The default second file name is logo", no! ">", to be 
consistent with MULtlCS conventions. In your directory, the two file names will, appear 
separated by a ".". Files whose second names are "fasl" are assumed to contain object 
code produced by the LISP compiler. This will correspond to the file with only the first 
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name [fio second component] in your directory. Here are some examples: [assume your 
name is "person" and your project is "project"] 



12.S Tcrminelogy 

On MULTICS, control characters are entered taUSP by first hitting the break or 
ofifi key [if you have one] and LISP should type CTRL/, then typing the ordinary non- 
control character^ then a carriage return. MULTICS has no other way of acknowledging 
your existence before you hit a return, which is the reason for this kludge. Because of 
this the contral-*character line oriented editor which exists in the ItS implementation, 
does not exist in the MULTICS implementation. MULTICS uses # to rub out the previous 
character I and m tarub out the entire line. Tq enter these characters to LLOGOf precede 
them with V 

\ If you should have to use an IBM 2741 terminal, remember that certain characters 
must be escaped. The worst offenders are / and / (type <eeiil-i{fn> <Iei«-iAiin> for / 
and <eem'Mign> <greater^than> for /), type <«oi-i»f «> for A, <efnl-jif M> <c<?nl-iif ii> for 
V si^d type a <cem^Mign> before # and o. Upper and lower cases are distinguished on 
MULTICS, and all of the system functions, both MULTICS's and LLOGO^s, have Igwer case 
names. 

To use LISP LCX30 on MULTICS over the ARPANET from ITS, it is recommended that 
Dave Moon*$ program TN6 be used rather than TELNET. See 0SKlINF0.;TN6 INFO for more 
details. 



LOGO fUe name 



MULTICS file name 



tread fil% foo 
Ireadfih foo bar * 
tread file foo fanl 
treadfile foo bar mumble 
tread file foo bar >udd>llogo 



>udd>proieei>per$on>foologo 

>udd>profeet>perMon>fooJbar 

>udd>projeci>per$on>foo 

>udd>f)rojeei>per$on>mumble>fooJfar 

>uid>llogo>fooAar 
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Section IS. Using LLOCO on TENSO and TENEX*iYsteni5 



The version of LLOGO for TEN50 runs in a version of MACLISP that is nearly 
compatible with that used at MIT-AI. The TE^ version can also be used on TENEX 
systems* Most of the incompatibilities are those necessitated by the difference in 
operating systems. Specifically^ the following commands are not implemented: 

PRINTOUT INDEX (alia$ POU LIST FILES) 

LOGOUT (BYE) ^ 

COMPILE 

LINEPRINT 

BUG 



Alsop the special packages for LLOGO (the turtle prrmitivas, the music primitives, and 
GERMLAND) are unavailable. 

Another difference between TEN50 ^OGO and LLOGO on ITS is in the typing Of 
control characters (such as aC, A/f, and all the editing characters - aR aB etc.). on ITS 
these characters may be typed at any time. Those specifying an interrupt action (aC» Aff) 
will always take effect immediately. Unfortunately, this is not true in the TE^60 
implementation, because TE^BO allows a running (Program to be interrupted only by the 
character aC. As a result of this, if the user wants to interrupt the LLOGO system while 
it is running (e. g. executing a user defined function), he must first type aC. TNs will 
interrupt the program, and cause it to print ?A, indicating that it is waiting to read a 
control-character. The user may then type the dtsired control-character, and if will be 
acted upon. Note that typing aC is not r^cessary if the LLOCaO system is not running, but 
rather waiting for Input. Therefore the editing characters may be used without difficulty, 
even on the TEN50 system. 

Another minor difference between the two operating systems is in the notation 
for file names. This difference is minimized by the syntax used by the LLOGO file 
commands. For instance, the command 

»» 

?RE/IDFILE PROCRM WO DSK USER 

will read the file DSKiUSER; PROCRM LGO on ITS, while on TEN50 the file read will be 
DSK:PROCRMJX!0/USER/: Thus most user programs will be able to run with little or 
no modification to their input/output operations. (Note that the default second file name 
is > on ITS, while on TEN50 it is LCO.) If you want to use a LLOGK) initialization file with 
the TEN50 implementation, the name of the file should be INIT.LG0 on your u^er 
directory ^ 

A version o.f TEN50 LI^GO is currently available at Carnegie*Melton (GMU-lOB). It 
may be loaded ther^ by means of the following command: 

.RUN DSK.L0C0/AmiJG99/ 
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Section H. GERMLAND 



The GERMLAND package is designed to provide the us^r with a display 
environment in which interesting nontrivial questions can easily be investigated, without 
the need for sophisticated display equipment. The current implementation runs on any of 
the character display consoles in use at the A.I. laboratory. 

Conceptually, GERMLAND consists of a square grid, on wNch may live** as many 
as 10 ''germs* Each*germ may have an arbitrary LOGO program associated with it; this 
program determines the germ^s movements, as well as whether it eats any of the "food" 
present at its position of the grid. For a discussion ^f some of the problems that can tKi 
investigated in this environment, see LOGO working paper 7. 



14.1 Starting Up 

; f ..... . 

The GERMLAND package may be loaded automatically at the start of an LLOGO 
run. When started^ LLOGO will ask which of the special packages you want. Simply type 
YESp followed by a carriage return, when it asks whether you want GERMLAND. The 
GERMLAND package will then be loaded, and dve you instructions for further help. Note 
that if the grid becomes garbled, because of a transmission eM'or for instance, you can at 
any tiihe cause it to be redisplayed by typing the character a\ {controlrbackslash]. 

14.2 Toplevel Primitivef . 
HUNCERM 

Invokes prompter. Asks questions necessary to get started and offers help. 
GERM DEMOS 

Runs a series of demos, leavin| the demo programs available for the user to play 

with. 

TOPCERM ■ y 

Starts up a GEfM.ANO READ-EVAIr-PRINT loop, using the' grid stt up by the 
most recent call tp Rl/ZVCERAf. 

UNGRID 

Exiti from TOPCERM, back to LLOGO. 

REPEAT <protraml> <progrum2> ^ 

Each program defines one creature. A round consists of executing each program 
in turi;i. After each rounds \}fm\rognft\ waits for input. If the user types a space, one 
round is performed; if the user types a number, that many rounds are done. This is 
repeated indefinitely until an error occurs. REPE/fT is not subtle with re^ct to 
parallel processing. No effort is made to try each program and see whether any conflicts 
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occur* Howav«r» •vintuaH/ • mort •Taborftt vtt^bti ^yM bt dtsigntd that WM 
stnftitri^t to syiKhroni^tnf th« livM of thi ptrmtll m p r0 g r mt wfmj^S9^^^ ftfff f/ff; 
it attempts to use the prof rims Msociated>ififfi eadt ferm by HVNGEHM. 




143 Grid Priwi tim 
CR!D <mLmb€r^ 

ftalizet GEIMJ^. A square grM is created iHtl) <nuiiiber> squeres m 
PRINTCRID 

Clear screen end redisplay GERMLANO grkL Typing a\ also causes this to 
happen* If there is a farm on the s<|uare> the character which represents thel ferm is 
printed in the square^s position. If (he square is an obstacle, an V is printed. If there is 
food on the square, the number of particles is printed If the square is empty* a V is 
. printed 

CRiDP <poiliiae> 

A predicate which outputs T iff the position is a legitimate grid square. 

-^^sfs^ Go into "wriparound" mod*, in which gtriM irt aHowtd to fO acrOM tho 
B^g^ariM of tho f rid. 

NOWRAP 

Ltavt "wraparound" moda. " ' 

Nota that mAP and NmMP affact tha variabia WMPAMOUHD. Sac Paga 46. 

MOVE <poiitU>n> 

The term is movad to tha tpacifiad grid aquara. <potition> is a santanca of tha x 
and y coordinates of tha square. Typical use is: HWE NOKTM. if the germ moves to a 
square which is already inhabited, the former inhabitant is MNed. MWE prints an error 
message if an attempt is made to MOVE to a square with an obstacle on it, or a square 
outside the grid. The <position> does not have to be adjacent to the current location of 
the germ. Hence, MOVE allows non-local movement to any grki.square. 



STEP <iir*etUn> 



I 

must be 



'<d(rection> is interpreted as a heading. K mUst be either 0, 90, 180 or 270 (mod 
360). STEP ellows more elegance in the description of a germ program. If the same 
structure is used for all directions, then the program can caN a subprocedure whose input 
is cycled through the four directions. 
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14.4 Property Primltlvet ■ , . ^ 

• PVTSQVARE <poiition> <information> <pr0ptrty> 

For the specified grid square, the data stored under the given properly |$ set to 
'<lnformation>. \ 

aSTSQUARE <position> <prop«rty> 

The Information stored under the <property> is returned. Typical uses are: 

(CETSQUARE <po$ilion> 'FOOD) returns food at <position>. 

(GETSQUARE <position> 'INHABITANT) returns the number oN the germ 
currently living there, NIL if unoccupied. 

(GETSQUARE <po$ition> 'OBSTACLE) returns T iff the square is an obstacle. 
REMSQVARE <poiitioH><preperty> 

Removes information stored under <property>^ 
WHAT<poiition> ^ 

Outputs all of the Information stored for the given position. 

FOOD <po$Uion> 

Outputs the numl>er of food particles at tha liven position. FOOD returns 0, no\ 
NIL, when there is no food. 

FOODP <poHiwn> 

Predicate which returns number of food particles if any at the given position; NIL 

If none. 

FILLFOOD <n> 

Puts <n> morsels of food on each square of GERMLA^D. 

EAT <numb€r> ^ 

Subtracts <number> of food particles from the current square. Generates an 
error if <number> is larger than the total food available. There are two types of germs 
~ those that are -hungry and those that are not. Each hungry germ has a food supply 
associated with it. The food supply is increased every time he eats by that number of 
particles, and decreased by one for each generation. If it ever reaches zero, the germ 
dies. So, If he eats only one particle of food on a turn, he mutt eat a^pin on the next 
turn; if he eats 2, he can skip a turn witliout eating, etc. 
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Multiple Cefm Primitim 
WHERE <:germ> 

Rttturm th« coordinatts of th« sqiMrt that ««rm It currtntly inhabiting. 
NORTHP <:g«fm> 



f?aturnt trua only if tha x coordinata of «arm it grMrtar than tha XWdinatt of 
the germ whosa prof ram Is currantly l)aini axacutad l)y Mff 4r. 

SOVTHP,WESTP,EASTP 



GERM <:g0rm><$qtmrt> 

Initializes :garm to start' out located at <a<|uare>. jgerm Is an Integer between 1 

and 10. 

FOODSUPPLY <:g*rmy 

Returns the amount of food that the germ hes. 
ACCESSIBLE <iquMi> <:gtrm> 

True If and only if <«arm> can get to <M|uare> on Ma next move. 

M.6 Turtle Primhim 

HEADING <:g€rm> 

Returns the current heading of the germ. 

FORWARD <mumb0r> * 

Move <number> spaces in the direction of the current haading. Abbreviates to 
FD <number>. <number> may be negative. ^ 

BACK <mmi*r> 

Move <number> spKes opposite to the current heading. Abbreviates to BK 

<number>. 

NEXT <4it*etUn> 

Returns the coordinates of the next square In tha current direction. 

OenMLANO SsdiaeMJ 




Analogous to NORTHP. 



KILL <:gtrm> 



Assassinates <:germ> and prints eulogy. . 



ERIC 
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RIGHT <nambtr> 

Turn right <number> degrMS— <number> should b# a multipla of 90. This may be 
abbreviated as RT <number> . 

LEFT <numb$r> 

Equivalent to RIGHT -<number>. Abbreviates m LT <number>. 

FRONT 

Returns coordinates of the square in front of the turtle. 
RIGIITSIDE, RE/IR, LEFTSIDE 

Analogous to FRONT. 
FSIDE, RSIDE, BSIDE, LSIDE 

Abbreviations for FROM' etc. 

14.7 Touch Primitives 
TOUCH <poiition> 

(. 

Outputs NIL If <position> does not contain somethinf that can t>e touched. 
Otherwise it outputs an atom describing the toi|chabla object, e.g. BORDER or 
OBST/ICLE. Typical use is: TOUCH FRONT. 

OBSTRUCT <tquare> ' 

Puts an obstacle at <square>. Germs cannot move onto squares with obstacles. 
OBSTRUCT <squar€> ^ 

Removes obstacle at <square>. 

14.8 Global Variables * 
KSERM 

The number of the germ whose program is being executed by REPEAT. 

k;ridsize 

Size of the GERMLAND grid set by the GRID function, 
'.HUNGRY 

T -> Germs are Killed if their foodsupply goes to 0. ^ 
NIL -> A germ's foodsupply is ignored by FlEPEAT. 

utRMLAND ^Seetioii 14.8 
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WKAPAROVND 

r -> Motion acrott borders it iMirmittad 
NIL -> Motion «crott liordtrt it an •rrorj 

»^ml!^. ^Mf/mJND dractly. Uca WKAP wni 



14.f ImpfemeiitatiM j 

GERMLANO imm an array to.rapratwtt tha grid, and additional arrays for aaty 
•cc.ti to informatwn about a particular farm. Tha Individual primitivas are, for tha most 
part, straif htforwardiy implamantabia, fivMt this data raprasantatioa Soma care it taken 
in interfacinc with the standard LLOQO envirionment, so that aH the usual debutiinc 



HOW HAP to chinft imxkt. 
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Section 15. 1M$pI«y Turtle Primittvet 



The display turtit p»ckig« for thu 340 and GT40 it also usable from an ordinary 
LISP as well as from LLOQO. Do (FASMAD WRTLE FASL DSK UjOGO) to fit th« 
simple display commands like FORWARD, MIGHT, etc. and (FASWAD DISPLAY FASL 
DSK LVOCO) for the fancier snap-manipulatinf commands. f] - 



Abbreviations for the following primitives are noted in square bracKfts. 
15.1 Startitie The Display- ^ 



Initializes the screen. The turtle is displayed- at its homer the center of the 
screen. This command is also useful for restarting everythinf when things get fouled up, 
the P0P6 losesp etc. STARTDISPLAY GT40 uses the GT40 display rather than the 340 
display. If you are using the GT40 as a display for the LCN90 turtle, it must not be logged 
in to ITS as a console. 

NODISPl/lY fND/ 

- Says you want to stop using the display* Flushes the display slave. 

If the display slave for the POP-6 dies, check that the run light is On. If not, stoprk) 
r^$et> deposit 0 in 40 and 41 and then start. ^ 

USP has three control characters for the display: 

A/V 

Turns off display. 

aK 

Display prints like tty. 

Af 

Turns on display for turtle, assuming a prior cali to STARTDISPLAY. 

IS.2Thc Turtle . 
JIID^RTLEfHT/ 

Makes the turtle disappear. 
SliOtTTURTLE fST/ 

Brings the turtle foKk to life. 

c . V 
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TURTLESTATE 

Rettirns 0 if tha turtle is not displaytdi fist returns the value of iWRTLE. 
zTVRTLE is the numt>er of the display item which is the current turtle. 

H/IKWRTLE <eQi€> 

^ The current turtle is /epiKed by the picture cirawn by <cade>. Provides 
capability to rotate pictures. Subsequent turtle commands^ liKe FORWARD, RIGHT^ etc. 
will make the picture drawn by <code> move as if it were the oriiinal turtle [triangle}. 

OLDWRTLE 

Restores the original LLOGO turtle. 

15.3 Movine the Ttirtle 
FORWARD Mepi fFDJ 

Moves the turtle -.steps in the direction it is currently pointed. 
BACK-MeptlBKl 

Moves the turtle :steps opposite to the direction in which it Js pointed. 
^- SETX:x 

Moves the turtle to (:x, FCOW. 
SETT ;y 

Moves the turtle to {XCOR, :y). * 
SETXYixty 

Moves the turtle to (:x, -.y). 
DELX:dx ^ 

Moves turtle to {XCOR+:dx, FCOR). 
DELY lij 

Moves turtle to (XCOR, yCOR+:dy). 
DELXY':dx.dy 

Moves turtle to (XCOR+:dx, YCOR*viy). 
HOME mi 

Moves turtle home to its starting state. 

Dis|ilay Turtle Primitive Section 1S.3 



USFLOOOMENO Fige49 . Jmm 27, 187^^^ ^) 

15.4 Erasing the Screen 
WIPE 

Erases the picture on the screen. Does not af/ect the turtle, or any snaps. 
WIPECLE/IN fWC/ 

Like WIPEf except hides snaps also. ^ 
CLEARSCREEN fCS/ >^ 

Equivalent to iriPB HOJUB. 

15.5 Turning the Turtle 

RIGHT Mttgh fRT/ . 

I 

Turns the turtle clockwise :an|fle defrees. 
LEFT mngh fLT/ . ' 

Turns the turtle counter^lockwile :angle degrees. 
SETHEADiangh 

The turtle is turned to a heading Qf :angle. 

15.6 Examinine the Turtle's State 

Note: The turtle's home is (0, 0) and a heading of 0 corresponds to pointing straight up. 
The variables tXCOR, lYCOR and tHEADING describe the state of the turtle in floating 
point. These variables should, not be changed explicitly by the user. The following 
functions return components of Ihe turtle's state rounded to tliMi nearest integer. 

XCX)R 

Outputs the X coordinate of the turtle. 

YWR 

Output^ the Y coordinate of the turtle. , 
HEADING 

Outputs the heading of the turtle. 
XHOME 

Outputs the X coordinate of the turtle's homo in atisolute scope coordinates (i.e. 
relative to lower left-hand corner of the screen) 

X, 

J 
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YliOME ' ■ , ^ .*. -C- ' \ 

* .• . ■ * ■ ■ * * . • . . . 

Outputs the Y cdordinate of the turtle^s honie inf absolute scope coordinates. 

15.7 The Pen \ ° . ■ , 

PENDOWN M>DJ A . ° 

Pen lowered to 'paper. Turtle leaviss a track when moved. » 
.PENUPfPU/ 

Pen raided from paper. Turtle does not leave a track When moved. V 
PENSr/iTE 

Returns +1 - penup or -1 - pdndown . , . * 

PENSTATE<lor-l> ^ - 

' Sets the penstate. A common use for this primitive is to make a sub-procedure 
transpjarent to pen state. 

T if pen is down, else NIL 

M ERE ■ \- 

Outputs CSENTENCE XCOR YCOR HE/IDING). Useful for remembering location 
yta MAKE" P" HERE. 

SEttURTLE ntate fSETT/ 

Sets the state of the turtle to :state. .-state is a sentence of X coordinate, Y 
coordinate, and heading. The heading may be omitted, in which case it is not affected. 

RANGE :p , ' ' ^ 

(li • , ■ ■ . ■ ■ ^. „. 

Distance from the turtle's current location- to jp. :p is a point specified by a 
sentence of X and Y coordinates. 

BEARING :p 

Outputs absolute direction of :p from turtlei ^ 
TOWARDS .p- 

Outputs relative direction of :p from turtle. * 
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15.8 Global Navigation | > 

Note: These primitives return floating point if either of th*ir inputs ire floating point. \ 
RANG^lxzy . 

Outputs distance of turtle from the point (:x, :y). 
BEARING :x :y 

Outputs absolute direction of {:x, y) from turtle. (SETHEAD (BEARING :% ty)) 
points the turtle in the direction of (»,:y). \ . 

. • '.. . ' 

TOWARDS :x :y 

Outputs relative direction of (a, y) from turtle. (RIGHT (TOWARDS :% ty)) 
points the turtle in the direcdDn of (:x, :y). 

15.9 Tf IgonomctfY ^ 
COSINE langle . 

Cosine of :angle degrees. 
SINE langle ^ ' 

Sine of Jungle degrees. 
^hNGENT :x,:y 

^ Angle whose tangent is :x/:y. * * 

COSt and AT AN are the corresponding functions which input or output in radians] 

15.10 Text ' . 
SIIOWTEXT 

Subsequent printing is rhoved on the screen. Initiallyi printing begins in the upper 
left corner.'' 

HIDETEXT 

Subsequent printing is no longer displayed. Text currently on the screen remains. 
REMTEXT 

Any text on the screen is erased and subsequent printing it not displayed. 

.SHOW 
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A variable which i& T if printing is being displayad, WI. if not. Set by 
SHOWTEXT, HIDBTEXT, and RBHTEXT. Don't tit it yourself. 

:TEXT .;. ,^ ■ 

Variable containing ttw number of the display item which is the text displayed by 
SHOWTBXT,e\c. 

MARK :x ■ ,- " ' ■ 

(TYPE }X} is placed at the turtle's current location. SNAP 'Hth' M/IRK 'text' 
creates a snap of the word "text". This allows the word to be manipulated, Le, Moved >o 
any part of the screen, etc. 

:TEXTXIIOME,:fEXTYHOME " 

Variables containing coordinates . of text to be displayed on the screen. 
Changeable by user. Initially tTEXTXHOME* O^ iTEXTYHOHflSi' iOOO. Tf«se are In 
absolute scope coordinates. - 

15.11 Manipukting Scenes — ' ^ . .. 

- - * . " ' " • 

Note: '.PICTURE is ftie name of the turtle's track. Does not include any snaps displayjed 
via SHOW, SHOirSNAP, etc. ;7T/miS is the name of the turtle. :TEXT is the name of 
any text displayed via SWOflTfBXf. 

SHOW ttcent , , 

:scene is moved to the current position of the turtle and displayed. It is not 
copied. . 

:scene is hidden but not destroyed. 

PHOTO 'tcene' fSSAP/ i 

The current ^jijcture is copied and named »cene. Any old snap of this name is 
destroyed. -\ . ^ 

PHOTO 'scene' '^e> ^$NAP/ 



The picture drawn by <line> is named »cehe. 
ENTERSNAP 'scene' 

">mCTVRE is rebound^ to a fresh display item. The initial state of this item hides 
the turtle. Subsequent commands refer to this new item. 

ENDSNAP 

The original -.PICTURE is restored. 



Ditpliy Turtle Primitives 57 



Seellm 15.11 



ERIC 



LISP UXn MEMO 



Page S3 



June 27, 1974 



RESIWIP "scene- ^ ^ ^ ^ >^ 

:scene is made the current picture. The only difference between tfiis and 
ENTERSNAP "scene** is . that a new display item is not created, and the turtle is not , 
hidden, ENDSNAP also restores the original :P/Cn/R£. 

l?£SiVi9P "scene" <Kne> 

The picture drawn by <line> is added to rscene. The <line> is executed, referring 
to the turtle residing in :scene. Subsequent commands will refer to the old turtle. 

P/C71/RE <<iispray commoniIs> ^ 

-.PICTURE is bound to a new display item whilft the commands are executed. The 
original zPICTURE is restored following execution of the commands. Similar \o SfMP 
"scene" <command»> except that no name is given to the new item. Instead, the number 
of the item is returned Thus, the same effect is achieved by: 

SN/IP '^icene'* <commandi> or 
HAKE "'tcinfT PICTURE <commanii> 

£xc^pt Jhat zscene is not added to fhlNli^f &f snaps. 

^SHOfTSmP :»cenif . . . 

: A copy^of :scene is displaye'd at. the turtle^ current p^i^^ 

mmsNAP iic^ni *' ^ • ^ 

AH copies of :scene are hidden. 
ERASE iicene / . 

Alt copies of :scene are destroyed. 
iSNAPS 

A list containing all current snaps. 
1512 Plotter 



PLOTTER 



the display Is plotted on a new plotter page, PLOTTER will asK if arrays from 
previou.s plot should be erased The user should type YES if his preceding plot is 
complete. 

PLOTTER i 

Display plotted on current plotter page. 

NOPLOT 
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The plotter 1$ rttoased. 
DISP/iGE 

Outline of 7x11 page displiyed as ;Pi9C£. 

DIALS :x 

Outputs the value of pot :x as a decimal fraction between 0 and I. Carefulf the 
numbers on the pots are marked In octal, but LLOGO normally expects decimal numbers as 
input. 



15.14 Points 



[Points are disptayed whether or not the pen is downj^ 
POINT 

Displays a point at the turtle's current location. 
POINT :p 

Displays a point at :p. 
POINT :Mnap :p 7 - - 

Displays a point in :snap at :p. 
POINT nnnp :x :y ^ 

Displays a point in -.snap at (:x, :y) 

15.4S Global State of the Turtle's World 



For all of these functions, the first input ":scene" is optional. If left out, the command 
.refers to tPICTUHE by default. 

SETHOMEiicme , 

Resets turtle's home to current positidh. 

SETItOME rwreite tx ty 

a ■ ' 

Resets the turtle's home to the absolute scope coordinates of (:x, ;y). Takes 
effect immediately by moving the current tPICTURE to the new home. (SETIfOME tie^ne 
SI2. SI2J restores the home to ttie center of the screen. 

MOTION ticene 
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Moves :scene under the control of space war console 1; Button terminates 
movement. The new home is returned, expressed in absolute scope coordinates. If the. 
current home is returne,d immediately . and the sfiace war console is ignored, check that all 
switches on the color scope data switch extension are in the middle position. 

BUSK ;$ceM > ' ^ 

Blinks :scene, • / 

UNBUNKtMceM • J 

Terminates blinking. ^ " ^ \: 

BRiCItT incene > 

Returns current brightness of :scene as a number from I f (dimmest) to 8 
(brightest). Ordinarily, tTURTLE and iPlCTVBE are at maximum brightn^s. ^ 

BRIGHT Mene ;hvel 

Sets brightness of :scene to ;level, where devel i$ an integer from 1 to 8, 
SCALfE ticene 

Returns current scale of tscene. Scale is an Integer from 1 (standard scale) to 4 
(16 times standard scale).. 

SCALE :$cene :$ife 

Sets scale of :scene to :size, where size is an inte|er from 1 to 4. :5ize is a 
multiplicative scale factor. Hence, SC/ltE « doubles the size "of an ordinary picture, 
SCALE S quadruples it and SCALE 4 multiplies the size by 8. SC/ltE J restores picture 
to standard size. This is a hardware scaling and affects the current display as well as 
future displayage. 

DSC/ILE .tcalt 

The length of a turtle step is reset to :scale. -.scale may be any /eal number. 
Resetting the scale with DSC/ILE rather than SCilLE has the advantage that the scale 
factor may be any real number. However, DSC/ILE applies only to future display and not 
the current picture. 
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Section IR TheMmicBox 



The music box is a tone ter)erat6r for from one to four simultaneous voices^ 
having a range of five octaves. Because of the timesharing environment, music is 
compiled into a buffer, and then shipped to the music box all at once, for smooth timing. 
Wherever possible, these primitives have been made compatible with both those of 
POPU LOGO and POPIO CLOGO. They made be used with the W (Minsky) music box, 
or the *^new** (Thornton box compatible) music box* * 



IRl Plugging In 

To plug in the otd^music box, find an EXECUPORT terminal Plug it into a 300 baud 
ITS line, using the phono type plug on the top right of the EXECUPORT bacKv or the 
acoustic coupler. Make sure the terminal is turned off, and plug the musit box into the 
left back of the EXECOPORT. (Or find this all set up in the music room on the third floor.) 
Turn off the music box and attKhed percussion tox, and put the EXECUPORT switches 
into the line" and "uppercase" positions. Turn ori the terminal^ type fsZ and log into ITS. 
The panic procedure for the old music box (symptoms keyboard dead but ITS not down) is 
to switch to local lowercase mode» turn off the music box, and type b.. Then type $P. 

When using the music box from MULTICS, remember that both carriage return and 
line feed must be typed to end a line, when using an EXECUPORT. The terminal should be 
in lialf duplex** and "lower case** modes. The panic procedure described above is riot 
recommended, since putting the terminal into local mode will have the effect of togging 
you out of MULTICS. 

Plugging in the new music box is a bit more of a problem due to limitations of 
present hardware. The critical item is a smill piece of electronics known as the "terminal 
controller card**, to be had from General Turtle in the bnement of 545 Tech Square. This 
. card Is to be inserted in the correct orientation in port 4 of a Thornton box. (If you have 
never done this, ask! Putting it in backwards will burn out the card.) The >usic box 
should be plugged into port 1, 2, or 3, depending upon which has the music box card. (It 
shoulct be labelled.) Then, plug the interface connector of the Thorton box into m 300 
baud ITS line, a terminal into port 4, and log into itS. The panic procedure for, the new 
music box is to get your termihar to echo "aC^ " (control-Q space). Since the normal pfint 
routines will actually •ehd^<uparrow Q> for <control-<}>, this is most easily done with the 
"echo" gidget of the Thorton Box, a small connector which makes the Thorton Box look 
like a full duplex computer line. (If you want to make yourself one, see General Turtle or 
Mark Miller; you probably woni need it.) 



16.2 Turning On 

Aseuming you are plugged in and logged into ITS, you may now run either music 
box in tISP or LLOGO. LLOGO will ask you if you want the music box; if so, it will ask you 
which one; if the new one, it will ask you which port it is plugged into. After answering 
ell questions, type STARTMUSIC It wUI tell you to turn on the rqusic box (the old^ne 
will make a lot of noise), and then type OK. Then, the noise (if any) will ^top» and you 
ere ready to go. LL0(30 behaves much like other LOGOs, and understands the primitives 
below. 
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The music box can also be run from a pure LISP. Type (FASW/ID MUSIC F/ISL 
DSK LIJOGO), s^pd answer the questions. Type (STARTMUSIC) and the following 
primitives will behave like LISP SUBRS or FSUBRS. (If you do ERRUST hacking, see Mark 
Miller.) 



IBS Music Primitives 



A great deal of effort has gone into ensuring upward cpmpatibility with CLOGO 
and ULOGO. If you have programs for either of these which no longer work on LLOGO, 
please let me know. Notice that many "intermediate" level functions such as CHORUS^ 
which had been written in LOGO code, are supplied as LISP primitives for efficiency. In 
addition, new facilities have been added which should be helpful. In the following, all 
such situations have been indicated. Occasionally, a single function replaces several 
LOGO functions; the others are still available, but may print a message recommending the 
newer function for future code. Sinde most music functions are executed for effect, 
unless otherwise indicated, the value of a function is the atom (word) ?. 



Returns the number which corresponds to a drum beat. Using DRUM is more 
efficient. 1^ inputs. 

BRUSH <duration li%t> 

Takes 1 input, a list of durations. Rays (i,e. stores in the music buffer for the 
current voice) a sequence of brush notes (see GRITCII) and rests. A duration of n 
means I brush followed by n-1 rests. 

CHORUS <form />.... <form i> 

Takes from one to ^ four inputs, which should be forms [procedures with 
arguments, or constants}. CHORUS evaluates each argument in turn, and then goes on to 
the next voice, in cyclic order, and evaluates the next argument. Example: 

?CHORUS SING I 10 SING 5 10 SING 8 10 
?PM I 

If the number of inputs is the same as :NVOICES, sequential calls to CHORUS or 
SING ^\\\ do the expected thing; if the number of voices used by the arguments is equal 
to :NVOICES, recursive calls will also work. For other situations, just remember that 
:VOICE is updated after evaluating each argument. For example, if :NVOICES «• 3 and 
you CHORUS two calls to SING, the next call to CHORUS will affect voice 3. 

CH0RUS2 <form l> <form 2> 

Version of CHORUS which takes exactly two arguments. For ^upward 
compatibility only. ^ 

CH0RUS3 <form l> <form 2> <form 3> 

Analogous to C//0/11/S2. 
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CUORVSi <form l> <form 2> <form 3> <f0rm 4> 

Analogous to CH0RUS3. 
DRUM <litt of iuntioni> 

' Analogous to BRUSH for drum notts {U* BOOM). 
CRITCII 

Returns the number correspondinf to the brush sound of the percussion speaker. 
More efficient to use BRUSH. 

M/IKETUNE <iuM Ham»> 

Takes as input a name, like LOQO MAKE or LISP SET. It multiplexes the buffer 
and «aves it as the "thini" of the name. That is, it stores the tune as data, as opposed to 
"^^•1"!^ P'*y'"« Pl'AyTUm and easy storage iS/iVEd with 

o her LOGO variables.) Since MAKETUNE does not clear the buffer, allows saving and 
playing incrementally larger portions of ■ long piece. Tunes made on one music box can 
be played on the other, with the exception that tunes with exactly three voices can 

Ilf™*** P'V"*' °" <«•• NVOICES). MAKETUNE did not exist In 

CLOGOor IILOGO. 

MBUFCIEAR 



^to inputs. Clears the music buffer, and starts at voice 1. This should be done for 
example, after typing AC to kill an unpleasant song, or after MAKETUNEing the final 
version of a song, before starting a new one. 

MBUFCOUNT 



Same as i^lEN. 
MBUFINIT 

No-op. Prints message to let you know you tried to use this relic of the past. 
MBUFNEXT 

No-op. (See MBUFINITi 
MBUFPVT 



No-op. (See MBUFINIJl 
MBUFOUT 



No inputs. Plays the music buffer. Does not clear it. * 
MCLEAR ' . ^ 

Same as MBUFCIEAR. 
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MLEN 

Returns the duration of the longest tVOICE created so far (since the last 
MBUFCEAR). Useful for building procedures such asiipercussion »c<*mpaniments for 
arbitrary length tunes, (see VLEN, MAX) 

MODUUSIC<TorNIL> 

Takes one input, NIL or otherwise. If non-iV/L, puts music in a mode where * 
numbering is from 0 to 59., and note 60. is the same as note 0. (i.e., (note mod 60», so 
that one need not worry about exceeding the range of the music box. 

NEWMUSIC 

^^0 inputs. Informs system that you wish to use the new music box. Asks which 
port music box is plugged into, formally user will not need to call NEWMUSIQ as the 
questionnaire at load time suffices. See: OLDMUSIC. 

NOMUSIC ; 

No-op. See MBUFPVT. This function may be reinstated as a way to excise the 
music package, for example, when one wants to load the turtle package instead. 

NOTE <pitch> <iuration> 

Unfortunately, (through no fault of LLOGiO), there are minor variations between 
IILOGO and CLOGO. The difference between NOTE and SING is one such problem. 
According to LOGO memo 7 (8/10/73), NOTE is the basic IILOGO music command. It 
takes two inputs, a pitch Ind a duration. It numbers pitches chromatically from --24. to 
36. with 0 being middle .C. There are also three special pitches, at follows: 

--28. is a rest 
-27. is a boom 
-26. is a gritch 
-25. is illegal. 

• 

ULOGO NOTE can also take multiple inputs. LLOGO music has implemented all of this for 
NOTE, except the multiple inputs. The numbering is slightly different from CLOGO SING. 
which 15 also implemented in LLOCaO. (see: SINGl 

NVOICES<h2,3,or4> 

Takes one input, hopefully a number between 1 and 4. Sets :NVOlCES to that 
number, clears the buffer, and sets iVOlCE to 1. Remember that 3 voices is illegal on the 
new music system, and will generate an error. It is generally better to use four voices, 
one blank, so that tunes, will play on either music box. In MODMUSIC T mode, (normally 
not the case), calling NVOICES with a number outside of [1,4.] will not cause an error, 
but seems ^crazy. The 1+ input mod 4 will be used instead SETmg iNVOlCES or 
W/lKKing "NVOICES'' cannot be prevented, but is considered a faux pas. Accessing 
INVOICES is welcomed. Calb MBUFCLE/IR and resets iVOICE to 1. See: tNVOlCES, 
.VOICE, VOICEK MODMUSIC 

OI.DMUSIC 
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No inputs. Putt tytttm in modt for old mgtit box. NcN^mally not nttdtd by uctry 
•s qutttionnaire at load tima tuf ficat. Mii^tjiaf'^itad, for axampl^i if you made a mistake 
answyinf the questions. Sea: SEWMU$lu 

PERFORM fmr^tUtUnPM J 

No inputs. Outputs^ the music buffer, and then does an MKJFCLEAR. See: 
MBUFOUT. MBUFCLKAR, PLAYTUNt. 

PMYTUNE <iun$> % 

Takes one input, which must evaluate to a tune created by M/IKETVNE. It plays 
the tune. Does not clear or otherwise alter the current music buffer. PL/lVTUNE Is 
transparent to the current number of voices, even if the tune uses a different number. 
See: MAKEWNR, PM. 

REST 

tk) inputs. Returns the number of the note which generates silence on the music 
box. (Like BOOM and CRITCHt tNs will win independently of whether ULOGO or CLOGO 
primitives are bein| used; likewise, it wilt be the correct number for MODMUSIC T Or 
normal state, even for different scalebases.) Nituraify this checkinf is less efficient than 
just calling SING -2S. or NOTE -If. for the appropriate duratioa See: SING, NOTE, 
MODMUSIC, tSCALEBASE. 

RESTARTMUSIC 

No inputs. Like Sr/lftf AfC/5/C; except re^initialiaces all system variables, and runs 
questionnaire as far back as asking which music box. Useful in situations of total loss 
after panic procedure. Usually tunes created by MAKEWNEt and user procedures will 
be intact. Buffer will be wiped out. In cases of peculiar behavior at login or load time, 
guarantees that everybody thinks they have the device you think they do. If tNs does 
not work, go to PLUGGING IN". 

SING <piteh> <iurmihn> 

* 

Basic CLOGO and LLOGO music command. Takes two inputs, a pitch number, and a 
duration. It is highly recommended that durations be Integers greater than 0! Very large 
durations (each unit corresponds to a character atom in LISP) are apt to slow down the 
system a lot, so small integers are highly advised. Pitches are from -25. to 39., with 0 
being middle C. (But see the remarks about llLOCiO's variant, NOTE, and also 
tSCALEUASE and MODMUSIC) Pitch -25. is « rest, -24. a boom, -23. a gritch, -22. 
ignored. (But see REST, BOOM, 6RIKH) DuratkMH are normally broken down into N-1 
beats of pitch and 1 beat of rest, to avoid slurring the music. However, if the SPECIAL 
variable .INSTRUMENT is ''STACCATO', I beat of note foltowed by N-1 beats of rest 
will be sung, (i.e., stored in the music buffer under the current voice). If other phrasing 
is desired, it may be added later. 

SONG <piteh0$> <4mrMihn$> 

Takes two inputs, a list of pitches and a list of durations. Calls SING, pairing 
pitches with durations until the shorter list is exhausted In other LOQOs, this was not a 
primitive, but was written as a recursive LOGO procedure. 
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STARTMUSI(: 

No inputs. Should be called to turn on the mucic lx)x. Unlike CLOGO, it pauses to 
let yOu turn on the box, to minimize the unpleasant noise generation on the old music 
box. {PERFORM alone will suffice). Clears the music puffer and sets il^OICE to 1. 
Probably unnecessary with Mew music box. 

VLEN 

No inputs. Returns duration of current bufftr. See: MBUFCXHJNT^ :MAX^ 
ULEN. Useful when chorusing a tune with an accompaniments If the accompaniment is 
the last argument to CHORUS and contains a stop rule likei 

IF VLEN ^MLEN THEN STOP 

the accompaniment can be used with arbitrarily long tunes. 

VOICE <voiee> . " ' 

Sets '.VOICE to its one inputi provided that input is a positive integer ^ess than 5. 
If greater than the current number of voices, NVOICES is called to increase the number. 
All music from now until the next call to VOICE (or a primitive like CIIORVS which calls 
VOICE) will go into this voice. All the voices in use will be multiplexed prior to 
PERFORMlng the buffer. In MODMUSIC T mode inputs greater than 4. do not cause 
errorsp but are simply cycled through the allowed voices. MAKEint (LLOGO) or SETing 
(LISP) ;J^O/CE is not nice. , < 

VOICES ^ ^ . 

^k)-op. See NOMUSIC. If anyone has a use for this which is reasonable, e.g., 
synonym for NVOICES, I will be glad to implement it. 



.INSTRUMENT 

Special system variable which is user sellable. Its value determines the behavior 
of NOTE and SING as above. Current meaningful modes are LEG/ITO and ST/KCATO. 
Anything else is considered ST/KCATO for now. 

:MAX 

This pseudo variable is actually a call to MLEN, above. It exists for compatibility 
with CLOGO. / 

'.NVOICES 

Special system variable, not to be changed except by calling NVOICES. It tells 
you the number of voices being filled or played at present. Default is 2. 

:VOICE 

Special system variable, to be changed only by calling VOICE. Tells you the 
current voice that is being filled. MRVf CLEAR resets to i. Always initialized to i. Can 
be changed by call to CHORUS. 
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:SC/ILEB/ISE ' 

Special systtm variable whkh may be chaof ed by utt r. tt tells the offset from 
middle C to be used in renumbering notes to ones taste. Default is zero. 
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IILOGO 2, 11, 13p37 
IILOGO User's manual 13,37 

340 14,38,47 

r Abbreviation 19, !22, 23 

altmodec^ 13 
ambiguity 16 
Angle brKkets • 13> 
/ APL 6 , ' 
jfs I arithmetic 3, 16, 17 

ARPAhET 39 , 
Array 1, 36 
• . ASCII 8 

associativity 16 

B1B0P 28 

brackets 35 

breakpoint 10, 24, 25 

buried procedures 21, 22, 23, 30 



canned loop 4 

carriage return 7, 8, 13, 20, 24, 35, 36, 39, 41 

Character display 1, 14, 41 

character syntax 8 

CLOGO 2,3,4,5,11,13,18 

CMU 40 

colon 36 

comments 36 

comparison 16, 17 . 
compile 22, 30 
ConditionaTs 4, 5 
CONNIVER 1,8 ^ 

Control character " 13, 20, 21, 24, 39, 40 

control structure 4, 31 Q 

control-atsign 29 

DATAPOINT terminals 14 
defining 5, 14, 20 
device 32 
devices 8 
directory 32, 38 
Disparity 2 

dollar 35 * 
dotted pair 3, 8 

double quote 34, 36 ^ <^ 
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^ •dit m4e 20 
Editing 3, 9; lOj 14/20.35, 40 
English : 2,4,5 ^1 
V error jiarKiling 24, $4 . - 
" error intftrrcjpf 25 •/ 

• error iitlerrupt^^ 10 f 

^ ^ error miBSsages S^IO 
eVftuiitor 9 
exctamitiori points -3fi 
\ expom^ritiitkm i7 

; file speK:ificati0n 32, 39 / 
fixisd point 1,5,4,37 
^ vTloatirif point 1 

food supply 43 

functionat art uments 19 

; garbjia (Cpltector 28 ^ 
- 4 V . generation 43 

GERMLANO 11,14,38,40,41 
.global variables 29 
6f40 11, 14^:38,47 

hej^ing - 42 ^ 
honwnyms $, 9, 18, 19 / 
^ HoW To dat On tlie System 13 
hungry 43 

, leM 2741 39 

identifiers 8 
impfementation 8,12 
infix 5,8,9,16, 17, 18 
initralization f lie; 14, 38, 40 
inputs 5,6,9,28- 
Interir^ tlSF^ 4lser*s Gurde 13 
interniiig 8, M 
^ Interrupt 1,21,35,40 



line number 3,4, 6,9,36 
Line oriented input 7 
line-oriented LISP reader 8 
l^nk 38 
lists 2 

logic 6, 16, 17; 35 

login. 13 ^ 

logout 15 . ' vs : 



MACUSP Reference Manual 13, 38 ^ i^^^ 

minus sign 18 T^ "" ^ 

mistyping 1& V 

mnemonic 3, 4 

MULTICS^ l?r 18,30, 32,38, 39 

music ' Sf l it 14, 34, 38, 40 ' 
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^ • Naturalness 2 

. I ' negative number _ 18 

NLLOGO 14 
noise words 4, 5 



'i reader 8 

readtable 8 
- . . recursion 1, 2 

' • . roundoffs 4 ' 

1 rubout 21,35 ' 

run time error 10,24 

Self-modifying procedures 31 
J ^ semicolon 36 ^ 

sentence$ 2 
- \ , sharp sign 25^ 29, 35 

side effects 28 : 
Simplicity 2 * ^ . 
^single charKter object 8 
single quoted ^4 . ' 
, " size 11" ' 
. • ' snap 47/ ' 

. speed 9, 11"^ 

stack to, 25, 25 
.string 11, 35 
», . * / super-procedure tree 

TEN50 12,32,40 
TENEX 12 
Thornton box 56 
TN6 * 39 
top level 29, 36 
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obarray 8 

obstacle 42 , 
output 35 ' 

parentheses 5, 7, 9, 16, 36 
parser 5, 9, 16, 18, 19, 28 
parsing property . 9 
pathname 38 

11,47 • ^ 
^rcent sign 36 
PLANNER ' 1,8 
precedence 16, 17 
prefix 5, 9, i6, 18 
pretty pfint 4 
primitives ; 8, 9, 22, 30, 34 

printing 9, 10 ' ' • 

prdgram form v 3 
prograrri understaffdfers 9 
prompter -20, 41 

Property list 1,|| 19, 36 / 
pure 11 p • 
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typ* checking 9, 10 
typinc*rrort 20 

unpiTMr 10, 18 

variiblM 6,21,29,33 

words 2 

wrong liumbtr of inputs 2S 
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Ail 


25 


AC 


40 


Ac 


20 


Af 




AC 


14, 30, 40t 58 


A/I 


26 


A V 




aP 


21 


aR 


20 


AS 


21 


AT 


36 


Air 


33 


aX 


14 


aF 


47 


aZ 


13, 56 


SP 


25,27 



CAREFUL 18 . 
COMPILED 30 
:CONTENTS 30 
:EDITMODE 20 
.EJIfPrK 36 
. .EUPTYW ^6 
:ERRBRE/tK 24,26 
.•CERW 45 , 
.GRIDSIZE 45 
.HEADING 49 
.HUNGRY 45 
;/WF/X 18 
-.INSTRUMENT 61 
:USPBREAK 26 
'.W/IX 61. 
:NVOICES 61 
.SCALEBASE 62 
;S//Oir 51 
;SiV/!PS 53 
.TEXTXHOME 52 
:TEXTYHOME 52 
iWRTLE 48 
i •I'O/CE 61 

r iWRAPAROUND 46 

;XCOR 49 
.yCOR 49 



Index to LLOQO Primilivn 



V o 72 
ERIC 



LISP LOGO MEMO 



Page 68 



June 27, 1974 



ABBREVI/TTE 19 
ACCESSIBLE 44 
AND 4,5,17 ' 
ARRAY 37 
ASCII 36 
ASSOCIATE 17 
ATANCENT 51 

ByKK 44, 48 
BEARING 50 
BK 44, 48 
B£,/iVK 55 
BOOM 57 
BOr// 5, 17 
BREAK 25 
BR/CHr 55 
BRl/SH' 57 
BSIDE 45 
B(/C 15, 40 
BURY 33 
BUTFIRST 2,3,4 
BUTLAST 2 

CAR 2, 3, 4 
C/I7X:ff 25 1' 
CDR 2, 3. 4, 36 
CHORUS 57 
CIWRUS2 57 
CH0RUS3 57 
CHORUS* 58 
CLEARSCREEN 49 
CO 27 

COMPILE 30,33,40 
CO/VS 3, 28 
CONTINUE 24, 25, 26, 27 
COS/iVE 51 
CS 49 

DECLARE 30 
48 

DKI.XF 48 
DC/T 48 
DESTRUCT 45 
DI/IW 54 
DISPACE 54 
DISPLAY 19 
00 4, 19 
DOITiV 26, 28 
DRC/M 58 
D5C4£.ff 55 
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EASTP 44 
EAT 43 
EDIT 18, 20 
EDITUNE 20 
EDITTITLE 20, 28 
EITHER 5,17 
END 20 
ENDSNAP 52 
ENTERSNAP 52 
EPt//I/. 5 

£/?/!5fi 19. 22/23, 33, 53 
EVALFRAME 10 
EX/r 27 
EXPLODE 36 

f /ItSE 6, 35 
FD 44,48 
FILLFOOD 43 
f /RSr 2, 3, 4 
FLUSIICOMPILED 30 
FLUSH INTERPRETED 30 
FOOD 43 
fOODP 43 
FOODSUPPLY 44 
FORWARD 44, 48 
f ROM* 45 - 
fS/i)E 45 * 

GERM 44 
CERMDEMOS 41 
CEr 19 
GETSQVARE 43 
CO 4, 5 
GOODBYE 15 
CR/D 42° 
CR/DP 42 

// 48 

HEADING 44, 49 
//ERE 50 
HIDE 52^ 
HIDESNAP 53 
HIDETEXT 51 
HIDETURTLE 47 
//OME 48, 49 
//r 47 

/f 5; 17 
IFFALSE 4, 37 
/FTRl/E 4, 37 
INFIX 17, 18 
INSERTLINE 37 
/S 5 
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KILL 44 

L/IST 2,18 
LEFT 45, 49 
LEFTSIDE 45 
tUl'EI, 35 
LINEPRINT 22, 40 
. LISPBREAK 25, 27 
t/Sr 19 
tWCO ff/vm 14 
LOCAL 37 

LOCOBREAK 25, 26, 27 
lOCOW '40 
LS/D£ 45 
tr 45,49 

MAKE 17,32,36 
MAKETVNE 58 
MAKTVRTLE 48 
MAPCAR 4 
JIf /IffK 52 
MBUFCLEAR 58 
MBUFCOUfiT 58 
MBUFINIT 58 
MBUFNEXT 58 
MBUFOVT 58 
MBUFPVT 58 
ira£i4A 58 
IftfiM 59 
MODMUSIC 59 

Manow 54 

HOI^B 42 ^ 
NEWMVSIC 59 

44 

/V//, 6, 35, 36 
NODISPLAY 47 
NOMUSIC 59 
iWPtOT 53 
NOPRECEDENCE 18 
JWRffff* 44 
IWr 17 
/WrE 59 
NOWRAP 42, 46 
/W0fC«5 59 

OBSTRUCT 45 
OLDMUSIC 59 
OLDTURTLE 48 
OR 4, 5, 17 
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P/HJSE 25 
PD 50 
PENDOWN 50 
PENP 50 
PENST/ITE 50 
PBM/P 50 
PERFORM 60 
PWOro 52 
PICTURE 53 
PLAYTUNE 60 
PLOTTER 53 
PO//Vr 54 
PRECEDENCE 17 
PR/iVT 18 
PRINTDOWN 27 
PRINTCRID 42 
PRINTOUT 6, 19, 20, 1 
PRINTUP 26 
PROC 9, 37 
PI/ 50 

PUTSQUARE 43 ; 

RANDOM 18, 37 
/I/]^C£ 50 
R£/]D 19 

READFILE 19, 30, 33 
45 

REMSOUARE 43 
REMTEXT 51 
REPE/ir 41 
RESW/1P 53 
RfiSr 60 ^ 
RESTARTMUSIC 60 . 
R/C//r 45, 49 
RIGIITSIDE 45 
ROUNDOFF 37 
RS/DE 45 
Kr 45, 49 
Wt'W 19 
RUNGERM 41 
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WE 18,32,33 
SC/ltE 55 
SD 47 
SETIIEAD 49 
SETIIOME 54 
SETT 50 
SETTURTLE 50 
SErX 48 

SErxy 48 

SETT 48 
S/ZOir 52 
SlfOWSNAP 53 
SHOWTEXT 51, 52 
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SHOWTUKTUt 47 
SINE 51 . 
SING 60 
SONG 60 
SOVTHP 44 
SPfiCMI. 30 
ST 47 

STAWTDISPLSr 19,47 
STAKTMUSIC 61 
SreP 42 
SWKK 37 
Sl/M 6 

r 35 

mr 4,17,37 

TEXT 36 
T//15/V 4, 5 
THROW 25 
TO 4,5,20,22 
TOPCEIW 41 
TOUCH 45 
TOWARDS SO 
r«/1C« 10, 23, 29 
TRUE 35 
TURTLESTATK 4S 
7TPK 52 

UNBUNK 55 
C/M;ff/D 41 
UNSPECIAL 30 
t/P 26, 27, 28 . 
(/Sff 33 
US^ER'PAREN 10 

FO/Ce 61 
(^0/G£S 61 

WC 49 
JTfiSTP 44 

r//4r 43 

WHERE 44 
r/Pff 49 
WllPECLEAN 49 
iriryip 42, 46 
iru/rB 32,33 

JCCOff 49 
JrHOMX 49 

YCOR 49 
rifOlfK 50 
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